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6ESPAC Gives You 
68000 Performance at 8-bit Prices. 




MPU-4B SNI 000301 
Actual Size 



Introducing another Price / Performance 
breakthrough from GESPAC: A complete 68000 
CPU module for $395 unit price. The GESMPU-48. 

Wherever you thought of using an 8-bit 
microprocessor to do a job, you can now use the 
16/32-bit GESMPU-48 instead. It will do the job. 
better, faster, and best-of-all for the same money. 

On a single height Eurocard, we have packed an 
8 MHz 68000 microprocessor (16 MHz optional}, 
four sockets for up to 64 Kilobytes of zero-wait-stotes 
CMOS RAM and up to 128 Kilobytes of EPROM, 
one RS-232 serial port, and three 16-bit timers. 

The GESMPU-48 is fully expandable through 
the standard G-64 bus, to accommodate up to 
16 Megabytes of external memory. You can add 
any of more thon 300 I/O modules available from 
GESPAC and a growing numbers of independent 
G-64 bus vendors. 

To make your programming tasks easier, 
GESPAC supports the GESMPU-48 with the OS-9* 
and PDOS* real-time, multi-tasking operating 
systems and most popular high level languages 
and software development tools. 
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If you too like the ideo of getting more for 
less, contact us today to receive information 
on the GESMPU-4B and the G-64 bus concept 
from GESPAC— the leader in single Eurocard 
microcomputer products worldwide. 

Call Toll Free 1-800-4-GESPAC 
or Call (602) 962.5559. 
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IN USA - CANADA 
50A West Hoover Ave. 
Mesa. Arizono 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONAL 

3, chemin des AijIx 
CH-1228 Geneva 
Tel. (022) 713400 
Telex 429989 
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GfTlX Micro -20 

68020 SINGLE-BOARD COMPUTER 



Mainframe CPU Performance 
on a 5.75 " x 8.8" Board 

(benchmark results available on request) 



$2565 



00 12.5 MHz Version 

Quantity Discounts Available 




Features 



Software 



32-Bit MC68020 Processor (12.5. 16.67. or 

20MHZ) 

MC68881 Floating-point coprocessor (optional) 

2 Megabytes o! 32-bit wide, high-speed RAM 

4 RS-232 Serial I/O Ports (expandable to 36) 

8- bit Parallel I/O Port (Centronics' compatible) 

Time-ot-Oay Clock w battery backup 

16-bit I/O Expansion Bus 

Up to 256 Kbytes of 32-bit wide EPROM 

Floppy Disk Controller lor two S'lt" drives 

SASI Intelligent Peripheral Interface (SCSI subset) 

Mounts directly on a 5 %" Disk Drive 

Optional Boards Include Arcnet. Prototyping, I/O 

Bus adapter. 60 line Parallel I/O. RS-422/485 



Included: 

• GMX Version of Motorola's 020Bug Debugger with 
up/ download, breakpoint, trace, single-step, and 
assembler/ disassembler capabilities 

• Comprehensive Hardware Diagnostics 
Optional: 

UNIX™ like Multi-user I Multi-tasking 
Disk Operating Systems 

• 05-9/68000™ (Real-time and PROMable) 

• UniFLEX™ 

Programming Languages and Application 
Software 

• BASIC, C. PASCAL, ABSOFr FORTRAN, COBOL 
and ASSEMBLER 

• Spreadsheet. Data Base Management, and Word 
Processing 

COMPLETE EVALUATION SYSTEMS AVAILABLE 



GfTlX 1337 W. 37th Place Chicago, IL 60609 
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The VME BUS and OS-9: 



Ultimate Software 
for the Ultimate Bus 



Modularity. Flexibility. High Performance. Future growth. These are probably the prime reasons 
you chose the VME bus. Why not use Ihe same criteria when selecting your system soltware? That's 
why you should take a look at Microware's OS-9/68000 Operating System— it's the perlect match lor the 
VME bus. 

When you're working with VME you must have access to every part ol the system. Unlike other 
operating systems that literally scream KEEP OUT!. OS-9's open architecture invites you to create, adapt, 
customize and expand Thanks to its unique modular design, OS-9 naturally (its virtually any system, 
from simple ROM-based controllers up to large multiuser systems. 

And that's just the beginning of the story. OS-9 gives you a complete UNIX-application compatible 
environment. It is multitasking, real time, and extremely last. And il you're still not impressed, 
consider that a complete OS-9 executive and I/O driver package typically (its in less than 24K ol 
RAM or ROM. 

Soltware tools abound for OS-9. including outstanding Microware C. Basic. Fortran, and 
Pascal compilers. In addition, cross C compilers and cross assemblers are available 
lor VAX systems under Unix or VMS. You can also plug in other advanced options, 
such as the GSS-DRIVERS™ Virtual Device Interface lor industry- 
standard graphics support, or the OS-9 Network File Manager lor 
high level, hardware-independent networking. 

Designed for the most demanding OEM requirements, 
OS-9's performance and reliability has been proven in an 
incredible variety of applications. There's nothing like a track 
record as proof: to date, over 200 OEMs have shipped more 
than 100.000 OS-9-based systems. 



Ask your VME system supplier about OS-9. Or you can 
install and evaluate OS-9 on your own custom system with 
a reasonably priced Microware PortPak™. Contact Micro- 
ware today. We 'It send you complete information about OS-9 
and a list of quality manufacturers who offer off-the-shelf 
VME/OS-9 packages. 



MICROWAR€ 



Microware Systems Corporation 

1866 NW 114th Street • Des Moines, Iowa 50322 

Phone 515-224-1929 • Telex 910-520-2535 

Microware Japan, Ltd. 

41-19 Honcho 4-Chome. Funabashi City • Chiba 273\ 

Japan • Phone 0473 (28) 4493 • Telex 781-299-3122 
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Modular Haidware Deserves Modular Software 
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Super SBC 




DATA-COMP proudly presents the first 
Under $5000 "SUPER MICRO". 

The MUSTANG-020~ 



MUSTANG-02& 



The MUSTANG-020 68020 SBC 
provides a powerful, compact 32 bit computer 
system featuring the "state of the an" Motorola 
68020 "super" micro-processor. It comes 
standard with 2 megabyte of high-speed SIP 
dynamic RAM. serial and parallel ports, floppy 
disk controller, a SAS1 hard disk interface for 
intelligent hard disk controller and a battery 
backed-up time-of-day clock. Provisions are 
made for the super powerful Motorola MC6888 1 
floating point maih co-processor, for heavy math 
and number crunching applications. An optional 
network interface uses one serial (four (4) 
standard, expandable to 20) as a 125/bit per 
second network channel. Supports as many as 32 
nodes. 

The MUSTANG-020 is ideally suited to a 
wide variety of applications. It provides a cost 
effective alternative to the other MC68020 
systems now available. It is an excellent 
introductoiy tool to the world of hi-power, hi- 
speed new generation "super micros". In 
practical applications it has numerous 
applications, ranging from scientific to education. 
It is already being used by government agencies, 
labs, universities, business and practically every 
other critical applications center, worldwide, 
where true multi-user, multi-tasking needs exist 
Ine MUSTANG-020 is UNIX C level V 
compatible. Where low cost and power is a must, 
the MUSTANG-020 is the answer, as many have 
discovered. Proving that piice is not the standard 
for quality! 

As a softwaie development station, a 
general purpose scientific or small to medium 
business computer, or a super efficient teal-time 
controller in process control, the MUSTANG- 
020 is the cost effective choice. With the optional 
MC6888 1 floating point math c -processor 

installed, it has the capability of systems costing 
many times over it's total acquisition cost. 



DATA-COMP 



With the DATA-COMP "total package", 
consisting of a heavy duty metal cabinet, 
switching power supply with if/line by-passing, 
S inch DS/DD 80 track floppy, Xebec hard disk 
controller, 25 megabyte Winchester hard disk, 
four serial RS-232 ports and a UNIX C level V 
compatible multi-tasking, multi-user operating 
system, the price is under $5000, w/12.5 
megaheilc system clock (limited time offer). 
Most all popular high level languages are 
available at very reasonable cost. The system is 
expandable to 20 serial ports, at a cost of less 
than $65 per pon, in multiples of 8 port 
expansion options. 

The system SBC fully populated, quality 
tested, with 4 serial ports pre- wired and board 
mounted is available tor less that $3000. Quantity 
discounts are available for O M and special 
applications, in quantity. All that is required to 
bring t complete "system" standards is a 
cabinet, power supply, disks and operating 
system. All these are available as separate items 
from DATA-COMP. 





A special version of the Motorola 020- 
BUG is installed on each board. 020-BUG is a 
ROM based bebugger package with facilities for 
d wnloading and executing user programs from 
a host system. It includes commands for display 
and modification of memory, breakpoint 
capabilities, a poweiful assembler/disassemble 
and numerous system diagnostics. Various 020- 
BUG system routines, such as I/O handlers are 
available for user programs. 

Normal system speed is 3-4.5 MIPS, with 
burst up to 10 MIPS, at 16.6 megahertz. 
Intelligent I/O available for some operating 
systems. 

Hands-on "actual experience sessions", 
before you buy, are available from DATA- 
COMP. Call or write for additional information 
or pricing. 
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Mustang -020 Mustang -08 Benchmarks 
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Upgrade Kit 
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' PAT - JUST ' 



PAT ■ m ©i 



i 

With 'C Sourcej 

$229.00 i v %©S®[M 



9m turn • tmmum 



A Oivlalon of 



S.E. 
Media- 

\_, 11 SMOCuuwfciSmiihRd. 

f* llitinu.Tn 3734 3 

1 [rk»SI0 600-6630 



PAT FROM S. E. MEDIA -- A FULL FEATURED SCREEN ORIENTED TEXT EDITOR 

with all the best of PIE. For those who swore by and loved PIE, this is for YOU! All PIE 
features & much more! Too many features to list. And if you don't like ours, change or add 
your own. C source included. Easily configured to your CRT terminal, with special configuration 
section. No sweat! 

68008 - 68000 - 68010 - 68020 OS-9 68K $229.00 



COMBO 



PA TiJUST 

Special $249.00 

JUST 

JUST from S. E. MEDIA - - Text formatter written by Ron Anderson; for dot matrix 
printers, provides many unique features. Output formatted to the display. User con- 
figurable for adapting to other printers. Comes set-up for Epson MX80 with Graflex. Up 
to 10 imbedded printer control commands. Compensates for double width printing. 
Includes normal line width, page numbering, margin, indent, paragraph, space, vertical 
skip lines, page length, centering, fill, justification, etc. Use with PAT or any other text 
editor. The ONLY stand alone text processor for the 68XXX OS-9 68K, that we have 
seen. And at a very LOW PRICE! Order from: S.E. MEDIA - see catalog this issue. 

68008 - 68000 - 68010 - 68020 OS-9 68K 
V With 'C source $79.95 J 
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ONE PENNY SALE 



NOT 128K, NOT 512K J[ (§ 
FULL 768K No Wait RAM 




The MUSTANC-OK™ lynem look every hnd from ill 
odiei 68008 lytcmt wc tested. Tunning OS-9 68KI 

The MUSTANG-06 include* OS9-68K™ Kid/or Peter 
Stark '■ SK'DOS™ SK'DOS ii ■ angle user, single tasking 
system thml lakei up where *FLEX™ left off. SK'DOS it 
actually t 68XXX FLEX lype system (Not a TSC product.) 

blown mult] -user, mulli- 
68000 OS-9 stiftwrnre 
fa the MUSTANG-OB 
6KXXX i>'lrmi are on 
And that ii\ N* mall 
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choice of OS-9 6SK or SK*DOS Add S750 Tor a un*k 
fioppy/25 mcgibyic hud din; system For those thai waned, 
DATA -COM P didn't forget. 

Specification i: Syiuxn includes OS-9 MK or SK'DOS 
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Dual 5" Disk System 

4 $1,99 8.08 

"25 Megabyte" 
Hard Disk System 

| A $1,998.09 
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flowing* for addressable KOMTPROM the RAM is the 
maximum allowed for a 68008. The 68008 can only address a 
total of I Megabytes of RAM The design allows all the RAM 
•pace (for all practical purpose*) lo be utilized What is not 
available to the user is required and reserved for the system, 

|80K can be easily configured, leaving 288K 
RAM (pace. The RAM DISK can be 
your jfailitatiai requires (system must 
• requirements). Leaving the 
i^^-sWr program use. Sufficient 
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This chapter discusses command-line 
processing and the use and misuse of the C comma 
operator. 



COMMAND - LINE 
PROCESSING 

Command line arguments provide a 
convenient and powerful means of 
specifying certain actions of 

programs being executed. Operating 
systems such as UNIX, Uniflex, and 
OS/9-68K which support wildcard 
file names on the command line by 
passing a pseudo-command line to the 
program in which the Tile names have 
been expanded into file name lists. 
Operating systems which support 
environment variables evaluate these 
values when they are coded on the 
command line. 



C programs may gain access to command line 
arguments with the argc and argv arguments of the 
main function. The following program outputs its 
list of command line arguments: 



♦include <stdio.h> 

mainlargc, argv) 
int argc; 
char *argvl ] ; 
( 



int i; 

for li - 0; i < argc; +*i) 
printff'%d %s\n", i, argvlil); 



The getopt function, which is available in many 
standard C libraries, provides a standard means of 
scanning arguments on the command line. It is 
defined as follows: 



exian char *optarg; 
extern int optind, opten; 

int getopt(argc, argv, optsoing); 
int any; 
char **argv, *optsffing; 

The getopt function returns the next option letter 
which matches one of the letters in optstring. 
Optstring contains a list of known options; if a 
colon appears in optstring, the preceding letter is 
assumed to be an option which takes an argument. 
Optarg points to the start of the option argument, if 
any. Optind is the index of the next argument to be 
processed. When all options have been processed, 
getopt returns EOF. If an error is encountered, 
getopt returns a question mark and, if opterr is 
zero, outputs an error message to stderr. 

Given a standard means such as the getopt 
function with which to process command line 
arguments and the ability of a C programmer to 
write custom means of scanning the command line, 
there remain decisions to be made concerning the 
level at which to issue piompts if the command line 
does not conform to expectations. 
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The most terse and unfriendly response is for 
the program to bomb, return without output, or 
issue a message such as "ERROR" and then to 
return. Unfortunately, many C programs take this 
approach. Many other C programs ignore invalid 
command line arguments and process the valid ones 
without other response. 

A somewhat better response by a C program to 
invalid arguments on the command line is to 
provide a one-line prompt providing the format and 
order of arguments expected, without explanation. 
For example, the following line might represent this 
type of prompt 

usage: si bin infile outfile Powaddr 
[high&Jdr [oflset [spliiflk]]]] 

An even better response by a C program to 
invalid arguments is to provide a help screen 
providing much more complete information about 
the use of the program, including all or most 
command line arguments and options. Consider 
the following sample output: 



usage: slbin infile outfile (lowaddr 
[highaddr [offset [splitf lie] ] ] ) 
creates binary file from SI records 

where: infile - input file name 
outfile - output file name 
lowaddr - hex low address 
highaddr - hex high address 
offset - hex offset value 
splitfile - split file name 

(if specified, odd addresses 
are placed in splitfile and even 
addresses are placed in outfile) 



With help of this nature, the user should seldom 
be forced to review a program listing or manual to 
determine how to use a program. OS-9/68000 has 
a suggested standard of a command line argument 
"-?" used to obtain help about a program. This is 
an excellent idea, and considerably increases the 
level of usability of a system which consistently 
uses such standards. When combined with other 
standards, such as options starting with hyphens 
and (not) being case-sensitive, the level of usability 
of a system is again materially improved. 



THE C COMMA OPERATOR 

In the C language, the comma symbol is used 
for several purposes. In declarations, in initializers, 
and in macro and function headers and calls, 
commas separate related items. In expressions, 
otherwise unattached commas arc considered 
arithmetic operators causing left-to-right sequential 
evaluation of their sub-expressions. The result of a 
comma operator is the type and value of the 
expression following the comma. The comma 
operator, like much of the rest of the C language, 
may be correctly used, to great advantage or 
incorrectly used, to great disness. 

The following statement 

if (i < 5) 

++i, ++k; 

is equivalent to the following satomtts: 

if (i < 5) 
< 

++i; 

++k; 
I 

providing a means of coding certain statements 
in a shorthand fashion. 

Similarly, the following swBnsit 

if (i < 5) 

j - ++i, ++k, ++1; 

is equivalent to the following statements: 

if (i < 5) 
i 

♦+i; 
++k; 

j - ++1; 
I 

which is legal, assuming that j and 1 are 
assignment-compatible. 

The most convenient uses of the comma 
operator, other than the shorthand uses shown 
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above, are probably in the return and for 
statements. 

The return statement has the following formats; 

renin 

nd 

return exp^son 

Folowing the first example above, the following 
statement: 

if (i < 5) 

return (++i, ++k) ; 

equivalent to the following sqdtojs : 

if (i < 5) 
I 

+ + i; 

return (++k) ; 
} 

from which the type of final value and type of 
the variable k is returned, although the value of the 
variable i is incremented before the value of k is 
incremented. 

The for statenent has the following format: 

for (expression 1 ; expression^ exprcssion3) 

which is equivalent to the following statements: 



\ 



expressionl ; 

while (expression2) 

{ 



expression3; 



) 



Frequently, multiple initializations are required 
before the controlled statement is executed the first 
time or multiple changes are required for the next 
iteration of the controlled statement. The comma 
operator is often used to make the expression of 
these requirements much simpler. 

For example, consider the following for 
statement: 



k; ++i. 



for (i 
I 



) 



j « i + 1; i < 



in which the first and thud expressions contain 
comma operators. Because of the left-to-right order 
of evaluation of expressions connected by comma 
operators, expressions dependent upon the results 
of previous expressions may be safely coded using 
comma operators as separators. 

One of the most common misuse of comma 
operators is to assume that function arguments are 
evaluated left-to-right because the parameter list 
looks as if it were separated by comma operators 
rather than comma separators. The C language 
would have been improved if K.&R or the new 
ANSI standard C had specified left- to-right 
evaluation of parameter lists, for consistency with 
comma operators. 

Another misuse of comma operators is in 
multiple subscripts. Rather than var[i][j], it is easy 
to code var[ij], especially for BASIC, COBOL, or 
FORTRAN programmers learning the C language. 
Many C compilers will not generate error messages 
in this case, leaving the inexperienced C 
programmer to find a subtle problem. 

Still another misuse of comma operators is in the 
misplacement of parentheses in complex 
expressons containing commas and parentheses. 
For example, the following statement will compile 
properly on most C compilers, but will not execute 
correctly: 

if (!(i = read(fd, buffer), 

sizeof (struct str) ) ) 

{ 



} 



hrrausr the statement should have been coded as 
follows: 

if (Mi - read(fd, buffer, 
sizeof (struct str) ) ) ) 
{ 



10 



May87 



68' Micro Journal 



C PROBLEM 

A BASIC program is being translated into the C 

language. The following BASIC declaration and 
statement are encountered: 



DIMA(10,10) 
I 

A(10,10) = A(iaiO)+l 

and are translated into the following C 
declaration and statement: 

intaj 10,10]; 
I 
a[10,10] = a[10,10]+I; 

There are mistakes in this translation, decisions 
to be made, and optimizing opportunities not 
applied here. 

One of the decisions which must be made 
concerns the use of base zero or base one in array 
declarations. BASIC processors differ in assuming 
either base zero or base one for arrays, but few 
BASIC programs use zero subscripts, even if the 
processor allows them. The use of the zero 
subscript in C programs is automatic, but may 
waste significant amounts of storage in 
multi-dimensional arrays. However, the translation 
is more complicated since every reference to a base 
one subscript translated to a base one subscript 
requires a subtraction. 

Another decision concerns the type of each 
variable. Most BASIC processors assume that all 
variables are have type of floating point by default. 
In many cases, the C program may be easily 
optimized by using types of char, short int. int. or 
long, rather than types of float or double, where 
appropriate. 

Two of the mistakes lie in the translation of 
A(10,10) used as a BASIC declaration or 
expression primary to a[10,10]. The declaration 
should be either a[ll][ 11] or a[10][10], depending 
upon whether zero subscripts are assumed in the 
BASIC program or not. If the declaration is 
a[10][10], all subscripts must be decremented by 
one. 

One of the optimization opportunities involves 
the statement incrementing A[10,10] by one. Most 
C compilers will not optimize this statement written 



as it is, but will coirectly process it. Rewriting it as 
a pre-incrementation allows most C compilers to 
optimize it. 



I 



intalUItll]; 
-KallOIlOl; 



This problem was included because it illustrais 
several of the more common problems encountered 
by BASIC programmers when they begin » code C 
programs. In the case above, many C compilers 
will silently compile the code, treating [10,10] as if 
it were coded [10] (remember the hazards of the 
comma operator?). 

Another common problem encountered by 
beginning C programmers is the use of the 
assignment operator '=' when the boolean equal 
operator '==' was intended. For the next C 
problem, consider what other features of the C 
language might present problems or might escape 
the scrutiny of those programmers already familiar 
with other languages. 

EXAMPLE C PROGRAM 

Following is this month's example C program; it 
illustrates one of the simpler forms of command 
line processing, using the getopt function described 
above. It provides only the simplest form of 
prompt, probably because the format is so simple 
and the user is assumed to have the listing available 
for reference. 



The Tower of Hanoi problem consists of three 
posts and a set of discs of increasing sixes. 
The initial configuration places all the discson 
one post arranged with small discson large ones. 
The goal is to transfer all the discs to another 
post. There are two restrictions: only one disc 
can be moved at any time, and it is illegal to 
put a larger disc on a smaller. 

This implementation depends on two 
libraries: The curses screen handling 
package is used to make the display. 
The getopt function is used to handle 
the command line options. 
The options control the size of the 
problem and the display style. 
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finish (s) 




Number of discs: 


char *s; 




The default number of discs is 


{ 




NOOISCS. defined below. The -n 


move (LINES-2, 0); 




option can change this up to a 


ref resh () ; 




maximum of MAXOISCS; the maximum 


endwln (); 




is based on a terminal screen 


puts (s); 




with 80 columns. 


puts("\033\\">; 




Display Speed: 


exit (0); 




By default, a smooth animation 


> 




algorithm is used. The -f (fast) 






option makes hanoi less smooth. 


initial (argc, argv) 




displaying discs at key points in 


char **argv; 




their transfers. This is a good 


{ 




choice for slow speed terminals 


int errflg ■ 0; /* option errors * 


t 


because there is still a motion 


int C; /* option flag */ 




illusion. The -t (teleport) 


extern char 'optarg; 




option shows discs only after 






they have been moved. 


puts{-\033]") ; 




while ( (C - getopt (argc. 




tinclude <atdio.h> 


argv, "tfn:"> ) !- EOF) 




(include <ctype.h> 


< 




tinclude <curses.h> 


switch (C) 
( 




fdefine LEFT 


case 'f ' : 




tdefine MIDDLE 1 


Display - FAST; 




fdefine RIGHT 2 


break ; 




fdefine KAXOISCS 13 


case "f: 




fdefine TOP (MAXDISCS+S) 


Display - TELEPORT; 




fdefine B1ANK ' ■ 


break; 




tdefine DISC '■' 


case ' n ' : 




tdefine NOOISCS 7 


Nodiscs • atoi (optarg) ; 
if (Nodiscs < 1) 




tdefine SMOOTH 


Nodiscs - NODISCS; 




tdefine FAST 1 


if (Nodiscs > MAXOISCS) 




tdefine TELEPORT 2 


Nodiscs - MAXOISCS; 
break; 




/* Display: SMOOTH, FAST, or TELEPORT */ 


default : 




int Display • SMOOTH; 


errf lg++; 




/* Number of discs, up to KAXOISCS •/ 


> 




int Nodiscs - NODISCS; 


) 




/* number of discs on each post */ 


if (errflg) 




int count [3] ; 


( 




/* column number of each post */ 


fprintf (stderr. 




int col|3); 


"USAGE: »s -, argv (0] I; 
fprintf (stderr. 




main (argc, argv) 


"(-stf ] (-n dlscs)\n") ; 




char **argv; 
( 

initial (argc, argv); 


exit (1); 
) 
col (LEFT) - Nodiscs; 






hanoi (Nodiscs, LEFT, MIDDLE, RIGHT); 


col (MIDDLE) - 3*Nodlscs; 




sleep (Nodiscs) ; 


col (RIGHT) - »«Nodiscs; 




hanoi (Nodiscs, RIGHT, MIDDLE, LEFT); 


initscr (); 




finish ("Done!"); 


- noecho (); 




1 


display (Nodiscs); 

i 
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display (n) 
( 

clear ; 
standout () ; 

mvprlntv (0, 0, " Tower of Hanoi ") ; 
standend () ; 
while (n > 0) 
mkdisc (n — , LEFT); 
I 

hanoi (n, start, inter, finish) 
I 

if (n > 0) 
t 
hanoi (n-1, start, finish, inter) ; 
movedisc (n. start, finish); 
hanoi (n-1, inter, start, finish) ; 
) 
) 

movedisc (n, start, finish) 
[ 

rmdisc (n, start); 

showdisc (n, start, finish) ; 

mkdisc (n, finish) ; 
) 

showdisc (n, start, finish) 
( 

int dir; 

int y; 

int x; 

if (Display — TELEPORT) 
return; 

dir - (collstart] < col(finish)) ? 
1 : -1; 

for (y - count [start ) ; y < Nodiscs-1; 
y++) 

( 
plotdisc (n, y, col (start), 
BLANK) ; 

if (Display — SMOOTH) 
refresh (); 

plotdisc (n, y+1, col (start I, 
DISC) ; 

if (Display — SMOOTH) 
refresh (); 
) 

refresh ; 
for (x - collstart]; x !- collfinishl; 
x ♦- dir) 
( 
plotdisc (n, y, x, BLANK) ; 
plotdisc (n, y, x+dir, DISC); 
if (Display — SMOOTH) 



refresh (); 
) 

refresh (); 

while (y > count [finish)) 
( 
plotdisc (n, y — , col [ finish I, 
BLANK) ; 

if (Display — SMOOTH) 
refresh (); 

plotdisc (n, y, col [finish), 
DISC) ; 

if (Display — SMOOTH) 
refresh (); 
) 
refresh (); 



mkdisc (n, pile) 
( 

plotdisc (n, countlpile), col [pile], 
DISC) ; 

count [pile] + + ; 

refresh () ; 



) 



rmdisc (n, pile) 
I 

count [pile]--; 

plotdisc (n, countlpile], col [pile], 
BLANK) ; 

refresh (); 
> 

plotdisc (n, y, x, c) 

I 

int i; 

move (TOP-y, x-n) ; 
for (i - 1; i <- 2*n; i++) 
addch (c) ; 



cor 



FOR THOSE WHO 

I 



\/ / /) l() k\(>\\ 
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LEAVING FOOTPRINTS 

V-Jne or my thoughts this month is 

about documentation. Have you ever 
gone back to some source code you 
wrote some time back, only to find 
you can't decipher what your were 
doing? Or better yet, ever try 

reading someone else's code? 
Especially when they believe that 
documenting is Tor the other guy! I 
remember one source code that had 
only one comment. "GOOD LUCK!" 
That statement probably covers it all. 

I am not innocent! I usually try to document 
my code, at least to the point of telling what a 
portion of code does. I am not one to do every 
line, but rather to comment on blocks of code. 
But beyond this, I have been a little sloppy. 
Occasionally, I have paid for it. 

A few years back I had the job of doing a 
rewrite of some code written in Basic. Now the 
original author had not done a bad job writing the 
program, but there was little documentation. 
Actually, it was not all his fault. He had 
developed the program on a 32K machine. The 
source code was being run in an interpretive 
mode, which meant all the source occupied 
memory. Every REM statement used valuable 
memory. His program was long. He could not 
afford to waste precious bytes on much 
documentation. Eventually, the 32K computer 
and Basic gave way to a PDP-11, running 
Fortran. This meant a major ie write of the code. 



To this end 

I would like to propose 

some standards. 

My standards 
are not 
chiseled in stone. 

Indeed, I 
would welcome 
feedback 
from readers. 



My task was to transform the old code to the 
new machine. It turned out to be a major project. 
Every loop of code had to be carefully examined 
to understand its function. Every variable had to 
be defined. Each subroutine had to be analyzed 
for its purpose. How much easier things would 
have been had there been adequate 
documentation. Things would have been easier 
had theie been footprints to follow. 

To this end I would like to propose some 
standards. My standards are not chiseled in 
stone. Indeed, I would welcome feedback from 
readers. But in any case here is my idea for a 
standard to cover documentation. 
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1. Header 

a. program name 

b. author 

c. date 

d. compile infon nation 

2. Function 

a. programs purpose 

b. its usage 

c. external routines called 

3. History 

a. version numbers 

b. dates changed 

c. modifications 

4. Comment all variables 

a. at declaration 

b. or in separate section 

5. Comment all the source code 

a. comment major sections 

b. cover unusual items 

I think using the above format will help to 
document a program well. It will add to the code 
size. But it will leave valuable information about 
what was done. For the purpose of the 
magazine, I will probably shorten this format a 
little. In most cases, the programs appearing in 
the 68' Micro Journal are the first versions. 
Also, I try to cover the programs usage and 
purpose in the columns. For programs appearing 
here, I will uses a slightly shorter version. It is: 

1 . Header 

2. Function — brief 

3. Commenting code and variables 

Documentation is not just for the author. It is 
also for anyone that uses the program. I 
remember at meeting of a computer club that I 
was member, another member announced to the 
group that he found he could save time when 
transcribing programs fiom computer magazines. 
He simply left out the comments. Others started 
agreeing that this was a good idea. I sided with 
the few that felt that the comments were put in for 



I am not innocent! 
Occasionally, I have paid for it. 

A few years back I had the job of doing a 
tewiite of some code written in Basic. 

My task was to transform the old code to 
the new machine. 

How much easier things would have been 
had there been adequate documentation. 

Documentation is not just for the author. 
It is also for anyone that uses the program. 

Documenting doesn't stop with the 
program code. 



a purpose. They were not put there to confuse 
and waste time. But rather to enlighten and save 
time. 

Documenting doesn't stop with the program 
code. It is always helpful when archiving a 
program, to include a DOC file and a HISTORY 
file. Let's say we've just created a masterpiece 
of a program. It is called DOIT. Wherever you 
save programs, you create a directory 
appropriately called DOIT. Now in it you 
include the original source code, doitc ( or .BAS 
or .PASCAL or whatever you program type). 
You also include a working, debugged version. 
There should be a file called DOC that covers the 
function and usage of you masterpiece. You may 
want to go into greater details, then were covered 
in the source code. Finally, you create a 
HISTORY file. It covers the dates, version and 
modification history. Again, you may want to go 
into greater detail. You may want to add other 
files that prove helpful. A common one is 
README. It usually acts as an introduction to 
the rest of the directory. Put in whatever will be 
helpful. 

On the system where I work, they encode the 
documentation in such a way that key pans can 
be later extracted. Useful information like the 
function and usage are removed and made into a 
separate file. That file is then added to a HELP 
directory. This can be very handy when you 
have a library of routines at your disposal. An 
entry to HELP with the appropriate name can 
elicit instant information. 

You may not want to go the degree that I have 
outlined here. But I firmly believe that you can't 
document too much. (Take that with a grain of 
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salt, please!) With most programs being 
compiled, assembled or compacted, the comment 
lines are removed. So there is no argument that 
memory is being wasted. As for storage, disks 
are not very expensive. There is really no excuse 
for lack of good documentation. Just remember, 
write your program for someone else to 
understand. 

REPLACING 

ANOTHER STANDARD 

COMMAND 

I have been at it again. This time I am 
replacing the LIST command. I use it frequently. 
Most times I use it for listing things to the 
printer. Unfortunately, it does not do everything 
that I would like it to do. First, I find that when I 
dump something to the printer, invariably a line 
will get printed across the perforations where 
pages are joined together. Second, printing from 
top margin to bottom margin does not look very 
attractive when the sheets are later separated. 
And finally, if I list a number of files on one 
parameter line, they tend to run together. It is 
difficult to tell where one file stops and another 
begins on the printout. So, this month I offer a 
new version of LIST. 

This version of LIST is written in C. I 
documented everything, according the 
framework, I outlined before. Hopefully this 
will make it easy to understand. I have included 
a functional and usage description. I also 
included the routines outside of main() and the 
first entry of its history. After each variable and 
constant is a comment of its purpose. Each main 
section of code includes a comment. 

Another item, I left in is the debug code. 
Anything appearing between the lines #if 
DEBUG and #endif are used to debug the 
program. For example, in main(), I used printf 
to print the value of the flags and the files that are 
to be listed. While I was debugging the program 
I had a line in the beginning, 

#define DEBUG 

All the code was compiled with the program. 
When I was finished and everything was running 
the way I wanted it, I commented out the #define 
DEBUG. Then at compile the debug code is 
ignored. It does not appear in the final, 
executable module. 



There are only a few external variables used. 
They are FFLAG. the form feed flag, PFLAG, 
the paginate flag, and HFLAG, the header flag. 
Initially, the flags are all cleared. They can be set 
from the input line by adding -f, -p or -h. If 
FFLAG is set, a form feed character is sent at the 
end of each listing. This is to prepare for another 
listing. Even if there is only one listing, it does 
advance the printer paper to the start of a new 
page. Setting PFLAG causes the top and bottom 
margins to be added. I set TOPSIZE to 6 and 
BOTrOMSIZE to 8. These seemed to be about 
right. Change them if you wish. The paper 
length is MAXLINES which is 66. This is the 
standard paper length. FFLAG, when set, 
causes a simple header to be printed. The header 
specifies the filename at the top of each page. 
This is helpful in identifying the files being 
listed. 

Main() has only a few functions. It sets the 
proper flags depending on the parameters passed. 
If there are no file names that were passed, it 
prints a little help message. This is located in 
help(). Otherwise, the files are listed one at a 
time with list(). 

List() does the actual work. It opens the 
filename, if it can. Then it reads a line at a time 
and prints it to the standard output path. It keeps 
a record of the number of lines printed. If it 
comes to the start of a page and PFLAG is set, a 
top margin is printed. A bottom margin will be 
printed, when it comes to within 8 lines of the 
page bottom. If HFLAG is set, a header is 
printed at the top of each page. And setting 
FFLAG causes a form feed character to be sent 
after the listing. 

There three other minor routines. There is 
ff(), which sends the form feed character. The 
roudne crO sends carriage returns for a specified 
| count. And header() prints the file name at the 
top of the page. These funcdons are short and 
could probably be incorporated into the listQ 
function. In fact, everything could probably be 
written into main(). The computer will process 
them either way. But for us humans, breaking 
up the program into parts makes it more 
understandable and easier to comprehend. 

I also opted to use the low level file I/O. I use 
open(), writeln() and close(). I chose them since 
the file operations did not call for anything more 
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complex. I like the higher level file operations 
like fopen(), fscanfO and fclose(). They are 
more standardized and useful. They also add to 
the program's size. This version of list is about 
2K in size. If the higher level disk I/O calls are 
used, its length grows to about 4K. My intention 
was to keep LIST short. And we need only the 
capability of the lower level calls. 

One note about LIST. It has a macro defined 
for printing string data. It is: 

#define print(c) writeln(OUT,c,strlen(c)) 



I use it to print strings. On the first pass the C 
compiler substitutes the string "c" found in 
print(c) into the second expression, wherever V 
occurs. OUT has been previously defined as 1, 
the standard output path. Actually, there is a 
small flaw with this construction. Think about 
this one and I'll tell what it is next time. I will 
give you two hints. The flaw won't harm 
LISTs operation in any way. And if you find 
and correct it, it will improve the program in 
some way. Think about it. Ill tell you next 
month. 

That wraps up another month. I realize the 
idea of documentation is applicable to not only 
the OS-9 community, but to everyone involved in 
programming. I think it is an important aspect 
that cannot be ignored. My belief is ( I hope it 
doesn't sound like I'm preaching) that we can 
show the rest of the world that we are 
professionals! 

LISTING 



1 /• 



2 Name: list 

3 Date: ll-JAW-66 

4 Author: Ron Volgts 

5 Codpllirvg: ocl llat.c 

6 ................ 

7 Function: 

6 This program replaces the standard 

9 LIST cornnand. It adds the feature 

10 of doing a form feed between files, 

11 adding margins at top arid bottom of 

12 page, and putting a header at the top 

13 of ev»iy page identifying the file. 

14 Usage: 

15 list (-p) l-fl l-h] filename (...] 

16 p'paglnate, adds upper and lower 
margins 

17 f-form feed, advance paper after 
printing 



IB h-page header with file 

19 External routines (outside of main))): 

20 1. help() prints help message 

21 2. cr outfit carriage returns 

22 3. list!) list a file 

23 4. header () ...prints header for page 
2 « .....».....*.... 

25 History: 

26 1. Version 1.0 l-Jan-86 

27 / 

26 

29 llnclude <stdio.h> 

30 Idefine FF -\xOC- /• form feed 
character •/ 

31 Idefine OUT 1 /• stadard 
output path •/ 

32 /• print macro «/ 

33 Idefine print (c) wrlteln(OUT, c, strlen(c)) 

34 /• conrants on next line during debugging */ 

35 /• Idefine DEBUG •/ 

36 Idefine KAXLENGTH 512 /• buffer size 
V 

37 Idefine MAXLINES 66 /* lines per 
page •/ 

36 Idefine TOPSIZE 6 /* top margin 

size •/ 

39 Idefine BOTTOM5IZB 8 /• bottom margin 

size •/ 

40 

41 char buffer [HAXLENG Til] , /• the buffer •/ 

42 *s; /• character for 
switch •/ 

43 direct int fflag-0, /• form feed 
flag •/ 

44 pflao>0, /* paginate flag 
«/ 

45 hflag-0; /• header flag 
V 

46 direct int count; /* line count •/ 
41 

46 main (argc.argv) 

49 int argc; 

50 char *argv(] ; 

51 I 
52 

53 /* set proper flags as passed in 

parameter line •/ 

54 while (--argc>0 it (*++argv) 10] — '-') 

55 for (s-argvlOJ+1; •«!- , \0'; s+4) 

56 switch <«s) ( 

57 case •!•: 
56 fflag-1; 

59 break; 

60 ca „ i F i. 

61 fflag-1; 

62 break; 

63 case 'p': 

64 pflag-1; 
£5 break ; 

66 case 'P': 

67 pflag-1; 
66 break; 

69 case 'h' : 

70 hflag-1; 

71 break; 

72 case 'H' : 

73 hflag-1; 

74 break; 

75 default: 
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76 print ('Illegal Option •>; 

77 wrlteln(OUT, a, 1); 
79 print (*\n*) ; 

79 argc-0; 

80 break; 
61 ) 

62 

83 /• cheek flag settings and file list •/ 

64 llf DEBUG 

85 ( 

86 lnt 1; 

87 prlntf ffflag-»d VnVfflag); 

88 prlntf fpflag-»d Vn*, pflag); 

89 prlntf fhfl«g»%d Vn*,hf lag); 

90 for (1-0; Kargc; 1++) 

91 prlntf C%s\n',axgv(H); 

92 > 

93 lendlf 
94 

95 /• print a help message If no files names 

96 vere passed or process them */ 

97 If («rgc<l) 

98 help!); 

99 else 

100 while large— >0) 

101 Ust(»ecgv**); 

102 > /* end of main program */ 
103 

104 

105 /• 

106 A help message Is printed 

107 •/ 

108 help!) 

109 { 

110 print ('Usage :\ n *>; 

ill print (' list |-p] |-f] I-h] filename 



p-paginate, adds upper and 

f-form feed, advance paper 

h-print header with file 



The file la listed to the standard 

On entry a points to the file nam. 

The flags are processed according to how 

they are set. 



|...J\n-); 

112 prlntC 
lower marglnsVn*) ; 

113 prlntf" 
after print ingVn" ) ; 

114 prlntf 
nameVn") ; 

115 print f\n*); 

116 ) 
117 
118 /• 

119 
output . 
120 
121 
122 

123 •/ 

124 llst(s) 

125 char «s; /• file najm */ 

126 { 

127 lnt path; /* path number V 

128 /• print path name •/ 

129 lif DEBUG 

130 prlntf Cla\n*,s); 

131 lendlf 

132 /* open path to file '/ 

133 if ( (path-open ( a, _R£AD>> — -IK 

134 print ("Can't Open ">; 

135 print (s); 

136 print f\n*>; 

137 ) else ( 

138 while (readlnlpath, buffer. mXLENGTH) 
> 0) ( 



hflag) 



pflag) 



139 /* do a top margin If needed */ 

140 if ((count— 0) «( pflag) 

141 count+-cr(6>; 

142 /• do a header If needed */ 

143 if ( (count— || coont — TOPSIZE) «« 

144 counts-header (s) ; 

145 /• print the buffer V 

146 print (buffer); 

147 /* the bottom margin If necessary 

148 if ((count— WVXLINES-eOTTOfCIZE) «« 

count t-cr (81 ; 
/• Reachad the end of the page? •/ 
if ( + +count > MAXLINES) 
count-0; 
) /• end of while... •/ 
/* do a final form feed If necessary 

if (fflag) 
ff (); 
} /• end of else •/ 
close (path) ; 
) /• end of listO •/ 

/* Subroutine prints BOL's for ct tines. 

The count Is returned . •/ 

cx(ct) 
lnt ct; 



149 
ISO 
151 
152 
153 
154 

155 
156 
157 
158 
159 
160 
161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 

174 
175 
176 
177 
178 
179 
180 



lnt t; 

t-ct; 

while (ct— >0) 

print C\n'); 
return It) ; 



/* Subroutine prints a form feed to output 



ff() 
< 

print (FF); 



/* 



Print header for page, s points to file 



181 */ 

182 header (s) 

183 char *s; 

184 ( 



185 
186 
187 
188 ) 
189 

xor 



print CFile: •); 
print (s) ; 
return (cr (2)) ; 
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USER 



From Basic Assembler to HLL's 



Windrush Strikes Again! 

What's new? If you arc a regular subscriber lo '68' 
Micro Journal, you have no doubt seen the ads from 
Windrush Micro Systems for their PLuS compiler, a 680XX 
code generating version of Iheir PL/9 compiler. They have 
been selling a 6809 running version that runs under FLEX 
for several months. Now they have, or are about lo have 
after testing by a few of their PL/9 users, a brand new 
version of PLuS for the 68000 running under OS-9/68K. I 
found an evaluation copy in my mail last Saturday. I 
couldn't do a great deal of fancy program checking because it 
was a limited capability demonstration copy. I have been 
promised a fully capable copy to test in about three weeks. 
By the time you read this, there will be an ad desciibing the 
product completely in the same issue. The compiler is along 
the line of that which has been advertised in '68' for some 
months, except that it is to run on a 68000 system as well 
as generating code for a 68000 or one of its valiants. 

The system includes a nice screen editor that is more 
than adequate for program editing, and a complete libraiy of 
functions much like that provided with PL/9. There are a few 
additions lo PL/9 provided as well. For example there is a 
32 bit long integer type, and three specific unsigned types 
of Hin My favorite shorthand statement of Pascal has been 
adopted. To assign a logical value lo a "flag" previously 
one had to use: 

if a < then negative = TRUE else negative = FALSE; 

Now the form used in Pascal is accepted: 

negative = (a<0); 

That is, the expression a<0 is evaluated and the TRUE 
or FALSE value of the result is assigned lo the flag negative. 
PLuS requires the logical expression to be in parentheses. 
The other shorthand notation comes from "C". Rather than 
having to spell out: 

index = index+l; 
one can now use: 

index ++; 

The equivalent decrement instruction index—; also 
works. The increment and decrement instructions also work 
on pointers lo various size variables. The compiler keeps 
track of the data type and increments or decrements the 
pointer by 1, 2 or 4 bytes as raquired. 



NOTES 



The manual is about half as large as the current PL/9 
manual, but it is all there. Because of the large number of 
features that have not changed from PL/9 I was able lo read 
through the manual in a couple of hours. 

The test or demo programs that were supplied ail 
compiled instantly and ran about as fast. I decided to try 
writing a program that would read an ASCII file of numbers 
and piint them out. First I got the program running simply 
reading and printing the values as text strings, and then got 
bold and decided lo ay the conversion routines in the library 
files to conveit the string lo a REAL number binaiy format, 
and then reconvert a real variable value back to a string and 
prim it out. I found a problem in the conversion of negative 
numbers. I have since spoken to Graham Troll, and he 
mentioned that this problem had been found and cured before 
I had reported it. We were able to make a temporary patch 
until the full version arrives. 

These remarks are in no way meant to be critical of 
Windrush. Remember that I said this was an evaluation copy 
and as such really hot off the press, and I would expect to 
find a bug or two in either the software oi the 
documentation. That is of course, the reason that smart 
software suppliers send out evaluation copies to people that 
they know will have applications for the software and will 
find bugs. A supplier can't envision all the uses lo which 
their software might be put, and the best test is to send it to 
a number of users with diverse applications. Ill report more 
here as I get along a little farther with the testing and 
familiarization process on the fully capable version. 

Autocad 

Our company has had a version of Aulocad, the 
computerize} drafting software for some time. We first ran it 
in IBM computer version on a Tandy 1200 HD. It worked on 
that machine, but it was slow and a pain to wail for it lo 
recalculate the graphics and update a scraen. When the Tandy 
3000 80286 system became available we tried Autocad on it 
and we believe there was a speed gain of about S times. The 
company decided m go all the way, and we have purchased a 
Sun 68020 based system with UNIX and a 70 Megbyte hard 
disk. The system is presently being installed and we expect 
a rather large increase in performance of the Sun system over 
the 80286, Autocad is not simple to use, but it is very 
capable and a beginner need nol use every function right 
from the start. We expect lo realize a great increase in 
productivity over doing mechanical drawings by hand. 
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though certainly nol immediately. We have one problem 
with the system. After Unix and Autocad were installed and 
all the software that we are not going to use, was removed, 
we had 10 megabytes of user space left on the hard disk. We 
found that Unix reserves some 44 8K user buffer areas in 
RAM that we can't release for use even though the system 
will be single user. Six megabytes of hard disk space is 
reserved for task swapping that will never be needed. I think 
Unix is a little overkill for a small computer system! 

The computer age is surely upon us. I submit in 
evidence the company for which I work, Hines Industries. 
We are a small company with about 50 employees. Offhand 
I can count thirteen computers that are in use every day, two 
or three of which have multiple terminals and users. The 
accounting department has a computer with multiple 
terminals, used of course for accounting payroll, etc. The 
Sale* department has two or three computers, one of which is 
used with several terminals for the preparation of quotes, 
generation of sales letters, customer database files, etc. The 
others are used for woid processing. 

The mechanical engineering department / machine 
shop has one computer dedicated to the generation of 
programs for the CNC lathes and milling machines, and of 
course the new one for running Autocad. The service 
department has two for keeping customer service records and 
for generating programs for some of our standard products. 
The Software and electrical engineering departments have 
four in house and one loaned out presently. We have a 
Tandy 1200 presently being used to run software to program 
a large Modicon Programmable Logic Controller for a 
machine. We have the Tandy 3000 used virtually eveiy day 
to run PC board layout software and Autocad for schematic 
diagrams, our old SWTPc 6809 system on which we develop 
software for our machines, a second SWTPc machine 
presently loaned out to a consultant who is doing some 
software development, and a home made 6809 based 
computer that is both a portable development system and a 
"lest bed" for the computer hardware that goes into our 
product. The purchasing agent has a computer that he uses 
to generate purchase orders and keep track of inventory. 
Thai's a little more than one computer for every 4 
employees! 

PL/9 LIBRARY BUG 

I strongly suspect that I have to cake the blame for 
this one squarely on my shoulders. I seldom use the COS 
function of the SCIPACK.LIB that is pan of PL/9, though I 
am responsible for writing it to a large extent. A week ago, 
at work, we had a program bug that seemed to be 
unexplainable. Eventually we traced it back to two things 
that we were doing that were unusual. First, since we 
normally display angle information in our system, we 
usually "normalize" all angles, that is, reduce them to an 
angle between and 2PI radians or 360 degrees. Secondly, 
we don't normally include the whole COS procedure in our 
scientific function library, since the following will do as 
well, though nol quite as accurately: 



PROCEDURE COS(REAL OP); 
(SIN(OP+PI/2)>; 



RETURN REAL 



The use of this trick reduces the code generated for the 
Scientific functions considerably, but that is beside the 
point. We tracked our difficulty down to an error in the COS 
procedure in ihe standard SCIPACK.LIB. It would seem that 
we adjusted the sign of the returned value nicely only if it 
happened to be in the second or third quadrant. If Ihe angle 
were not normalized, as for example between 450 and 630 
degrees, the returned value would incorrectly be Positive 
rather than Negative. The offending code follows with the 
fix clearly commented and added in upper case so it is 
visible. 



procedure cos (real op) : 

byte negative, quadrant; 

if op - _pio2 then return real 0; 

quadrant « fix tint (op / _pio2)l; 

op » op - quadrant * _pio2; negative - 0; 

QDADRANT - QDADRANT AND 3; /* ADD TO 
NORMALIZE QUADRANT */ 

if quadrant - 1 .or quadrant - 2 then 
negative - 1: 

if quadrant and 1 then op - _pio2 - op; op - 
_poly(op * op, .cos_coef f , 5) ; 

if negative then op « -op; 

endproc real op; 

PRACTICAL MATHEMATICS 

Something I was doing last week brought to mind a 
practical example of what one can do with a computer. Ill 
take an example that is a little more straightforward than lite 
one I was working on, bul the principle is the same. I don't 
know how many of you have studied Integral Calculus, bul at 
least in my College days, it was not a subject that was 
studied by many people outside of the Engineering School. 
This bit might be a little insight into what Integral Calculus 
is all about, but even if that part leaves you cold, there 
might just be something practical here for you. Suppose for 
a moment that you want to find the volume of a cone shaped 
solid, fairly accurately. For simplicity let's assume the cone 
is 3 inches high, and 2 inches in diameter at the base. If we 
assume the base is circular, that implies that the base is 
perpendicular to the axis of the cone. The volume of such a 
cone is 1/3 PI * R A 2*H. The diameter of the base is 2 
inches so R, the radius is 1. PI*R A 2 is therefore PI* 1. Now 
H is 3, and we have to multiply by it and take 1/3 of the 
result, so that the result,, that is the volume of the cone is 
just PI or 3.14159265 cubic inches. 

Suppose I had forgotten the 'formula' for the volume of 
the cone, and also that I was weak in my Integral Calculus, 
but I remembered the basic principle of breaking the volume 
down into little pieces for which I could calculate a volume, 
and then summing all of them. Suppose we superimpose a 
coordinate system on the cone, pulling the tip at the origin 
so that the cone axis lies on the positive X axis. Now let's 
break the cone up into a large number of very thin circular 
disks whose area we can calculate easily. Since the radius of 
the base is 1/3 the height, and the sides of the cone are 
straight, we can assume that the radius at any point on Ihe X 
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axis is X/3. The area of a disk al (hat point on the X axis is 
PI»(X/3) A 2. Now lei's do a simple program in BASIC lo 
solve for the volume. Assume we start at the lip of the cone 
and calculate the volume (area limes thickness) for 3000 
disks, each 0.001 inch ihick. The Basic program uses a 
loop for X%»1 10 3000, and X=X%/1000.0. to calculate the 
radius at each point It ihert calculate* ihe area of thai circle 
and multiplies by 0.001. the thickness, and adds it lo the 
total volume V. You might note thai ihe radius of ihe disk 
happens lo be ihe radius al the largest edge of ihe disk. That 
is, ihe "edges" are not straight, but are part of ihe cone's 
surface. We mighl do better lo lake an 'average radius' for 
each disc, ihe value for ihe middle of ihe 0.001 inch ihick 
disk. That improvement has been made and the sum of the 
volumes of those disks is found in V2 after running the 
program. 

If you dump this program into your computer and run it 
under a good BASIC such as TSC Extended BASIC you will 
find that the value for V is a little high, being off by 2 in 
the 4ih significant digit. The value for V2 is a much better 
approximation, having an error of 1 in the 8lh digit. Of 
course. Extended BASIC has 16 digit arithmetic, and if you 
run this on a 6 digit BASIC, you won't gel 8 digit precision. 
There are many calculations performed in running this 
program so be prepared lo wait a few minules for il to finish. 

If we generalize this approach a little, call ihe height 
of ihe cone H and the radius of ihe base R, the calculation we 
have done is the basis for solving ihe integral to derive ihe 
general formula for ihe volume of a cone. Since I don'l have 
an integral sign available for this, I'll spell il out in words. 
Ihe integral we musl solve is the Integral over the limits 
to H of PI • (X*R/H)*2 dx. PI. H. and R are constants and 
can be taken out of the integral so we have PI*R A 2/H A 2 
times ihe integral of X A 2 dx. This integral is one learned 
ihe first week of an integral calculus course, and is X A 3/3. 
Evaluating that over the range of lo H we obtain Volume ■ 
PI*R A 2/H A 2»H A 3/3 -0.0 which simplifies lo PI»R A 2»H/3, 
which is ihe general formula for the volume of a cone. 

The point of this is that il 'is possible to sum ihe 
volume of lillle slices of a larger solid lo airive at the total 
volume by using ihe computer. In the case of last week, the 
Integral that I would have had to solve was beyond my 
powers with Integral Calculus. I could set up the problem as 
the sum of ihe volumes of some thin slices, and doing so 
yielded a solution (though indirect and not precise) to my 
problem. If you use this technique and warn to estimate the 
error in the result, reduce the thickness of the "slices" lo half 
the original value, which should make the error about half as 
large, and note ihe change in the results. I did that in my 
problem of last week, and the results changed by about 1%, 
which indicated that the error in my second approximation 
was about 1%. 



There are more accurate ways of doing digital 
integration. One good source for algorithms for such uses is 
the book "Some Common BASIC Programs" by Borchers and 
Poole, published several years ago by Osborne. The book 
contains programs for solving simultaneous equations, 
numerical integration and differentiation, fitting a curve, 
(approximating a function to fit empirical data using what is 
called polynomial regression), and a number of financial 
calculations as well. 

Last Minute Notes 

I just received an update on OmegaSofl Pascal 
OS-9/68K, and I will be reviewing it as soon as I gel thai 
latest version installed in the Mustang, 

I also received a very interesting letter from Teny 
Ritter yesterday. Terry is one of ihe "creators" of ihe 6809. 
and he had some interesting observations about 
standardization, expending on my mention of ihe subject in 
my last column. I musl gel this off to '68' Micro Journal, 
bul meanwhile I have sent a letter lo Terry asking for 
permission to quote his letter here. 

As of loday, I still await ihe latest version of PLuS 
from Windrush. It is also an OS-9/68K version. I plan a 
review here as soon as I can do some testing of il as well. 

10 REM VOLUME OF CONE 3" HIGH. WITH 1" RADIUS 

20 REM POT THE TIP AT THE X-0 POINT. AS X 

INCREASES FROM 

30 REM TO 3. THE RADIUS OF THE CONE INCREASES 

FROM TO 1 . 

40 REM THEREFORE THE AREA OF A THIN SLICE OF THE 

CONE AT A 

50 REM GIVEN DISTANCE X FROM THE ORIGIN IS 

<X/3)"2*PI 

60 REM THAT COMES FROM THE AREA OF A CIRCLE 

BEING PI*R"2 

"7 REM NOW SET UP A PROGRAM TO LOOP AND SUM THE 

VOLUME IN A LARGE 

80 REM NUMBER OF THIN SLICES OF THE CONE. SAY 

0.001 INCH THICK. 

90 FOR X%-0 TO 3000 

100 X-XI/1000.0 

110 V- V + PI«(X/3)-2"0.001 

115 V2 - V2+PI* ( (X-0.0005J/3) A 2*0.001 

120 NEXT X% 

130 PRINT"APPROXIMATE VOLUME IS: ";V 

135 PRINT "BETTER APPROXIMATION: ";V2 

140 PRINT"VOLUME BTf FORMULA V-l/3 (AREA OF 

BASE) •HEIGHT";PI 

150 END 

EOF 
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Forth 



A Tutorial Series 



By: R. D. lurie 
9 Linda Street 
Leominisler, MA 01543 



UNLIMITED MEMORY FOR THE 
6809 

Even though (he 6809 can only directly address 
64K of RAM at any one time, this does not really 
limit a program's memoiy use, If one makes use of 
the concept of virtual memoiy. Virtual memoiy 
looks like something for nothing, which Is always 
suspect, but It actually works veiy well. What you 
are really doing is substituting disk storage for 
RAM storage. The most wonderful aspect of this is 
that it Is essentially automaUc in FORIH. 

When FORTH was originally developed. RAM 
was veiy expensive and scarce, so there was an 
immediate need for a substitute. Even then, (loppy 
disks were available at a cost effectiveness far 
beyond any other storage method. Therefore, the 
choice was consciously made to substitute disk 
memoiy for RAM memoiy. The only penalty paid 
for this exchange was In access speed, but an 
unlimited memoiy was obtained at this relatively 
small cost. Lets face It. FLEX disk I/O is SLOW, 
even when compared to CP/M. But it la still plenty 
fast enough to be comfortable. Furthermore, where 
else could you get multi-megabytes of random 
access memoiy for the price? 



Virtual Memory in FORTH 

Many people do not realize that they are using 
virtual memoiy from the outset with FORTH. 
Eveiytlme a screen (block) Is accessed in any way, 
that Is an operation with virtual memory! Sure. It's 
a lot faster with a disk, but It works well with 
cassette tape. So don't be afraid of the concept of 
virtual memoiy, you have been using it all of the 
tlme--you Just may not have noticed it. 

The key word for making use of all of this 
available memoiy is BLOCK . The phrase 
<screen#> BLOCK puts an address on the Data 
Stack which points to a memoiy buffer; it also 
loads from the disk 1024 bytes of data from the 
four consecutive FLEX sectors which are Indicated 
by the value of <screen#>. Of course, a FORTH 
such as from Stems Electronics which uses a 
different number of bytes for a "screen" will use 
BLOCK to fetch that many bytes from the storage 
medium, but the idea Is the same. 



Virtual memory looks like 
something for nothing, 
which is always suspect, 
but it actually works very well. 



Let's face it, 

FLEX disk I/O is SLOW. 

even when compared to CP/M. 

But it is still plenty fast enough 

to be comfortable. 

Furthermore, 

where else could you get 

multi-megabytes of 

random access memory 

for the price? 



Reading Virtual Memory 

There is nothing special Involved In reading 
data from virtual memoiy. Just use <screen#> 
BLOCK . You cannot use <screen#> LOAD or 
<screen#> LIST as conveniently, because of 
various side- effects, so be careful to use only the 
word BLOCK when you only want to move data 
from vlilual memoiy Into RAM. 

LOAD does move data Into the buffer, but 
FORTH also tries to Interpret the data at the same 
time, and this could lead to all kinds of problems. 
LIST forces output to the display and/or the 
printer, which could also cause problems. So stick 
to BLOCK for all data access and you will stay out 
of trouble. 



Writing to Virtual Memory 

Writing to virtual memoiy is Just as easy as 
reading It. Assume that you have some text that 
you want to save (remember that normal FORTH 
files are In ASCII) that presently Is In RAM at a 
location called TEXT-BUFFER . Further, assume 
that you want to store this data in screen #57. To 
do this you must move the text to the disk with the 
following command: 
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TEXT-BUFFER 57 BLOCK TEXT-SIZE CMOVE 
UPDATE FLUSH 

TEXT-SIZE Is the number or bytes to be moved, 
and cannot exceed 1024 without overflowing the 
standard FORTH disk buffer. CMOVE does the 
movement of the data and the phrase UPDATE 
FLUSH causes the data to be written to the disk In 
the position corresponding to screen 457. 



FORTH Files are not FLEX Files 

I think that one of the biggest barriers for 
beginners Is realizing that It really Is this easy to 
read and write disk (or tape) data. It looks so 
simple that there must be a catch somewhere, but 
there is not. Well, maybe there Is one catch. In that 
the operating system does not protect anything 
from being read or written oven that Is the 
responsibility of the programmer. Truthfully, that 
Is one or the things that I appreciate In FOKTH-- 
belng given credit for knowing what I want to do. Of 
course, that also means that I have to accept 
responsibility for errors! 

All of the FORTH systems that I know of which 
operate under FLEX give you the option of using 
the scieen files In the FORM style, or of using the 
normal FLEX text files. However. I don't know of 
any system which allows you to blithely mix the 
two forms In one file. 

Wilson Fedeilcl's FF9 (FORTH-B3). which I use. 
has several predefined words for handling FORTH 
files In the FLEX foimat. and I use the FLEX foimat 
quite often for finished programs. However. I found 
that this was not a very convenient way for me to 
develop programs, so I use the standard FORTH 
screens until the program Is running the way I 
want It to. then I shift It to the FLEX format for 
regular use. since this Is a much more secure filing 
system. 

FORTH AND OS-9 

Since I have no way to check what I want to say 
here, let me make sure that eveiybody knows that 
the following Is Just speculation. 

1 think I know why FORTH has not been mated 
to OS-9. level I. llie main reason Is that there Is 
really no need for It. If you are limited to 64K. then 
FORTH can easily stand by Itself and. as I have 
shown above, does not really need a supporting 
DOS. Of course. It helps to have disks formatted to 
a commonly used DOS. but this bares no 
relationship to necessity. If somebody wanted to 
write a set of disk drivers, etc. to hang onto the 
FORIH backbone, there would be no need for 
FLEX or OS-9. except for the first time the disk was 
to be read. Look at those FORIH systems written 
to run with the CoCo "system" for a ready example 
of a fully functional system. 

Several companies have advertised FORIH for 
OS-9. Level II. for the 68000. Again, mark well that 
I am only speculating, but I think that they may be 
using only 64K for the FORIH. and are treating It 
as If It were a stand-alone FORTH which Just 
happened to be loaded from an OS-9 disk. 



I have talked to several professional FORTH 
programmers about the possible limitations of 
64K. and none of them have ever had to use moie 
than 64K on any single machine. Of course, the 
whole system In FORTH to control the airport In 
Saudi Arabia uses more than 64K, but not tn any 
one controller (as near as I can find out). 

The basic problem, as I sec It, In combining 
FORIH and OS-9 Is that FORTH makes extensive 
use of absolute addressing, and OS-9 expects to 
use only position-Independent code. Therefore, if 
you could fool OS-9 Into thinking that the FORTH 
was In ROM. you might get away with using Level 1. 
On the other hand. If you use I«vel II to assign 64K 
to FORIH by Itself. It might look like pic to the OS- 
9. but absolute addressing to the FORIH. Can 
anybody shed any light on this? I have been asked 
by several people if I could point them to a FORIH 
for Level 1. both for the CoCo and for controllers, 
but I have had to admit Ignorance. 

If I were better versed In OS-9, I would tiy to 
adapt to FORIH the OS-9 disk drivers (SDISK and 
eOOTFlX) sold by D. P. Johnson. This way. FORIH 
could read and write disk flies on OS-9 formatted 
disks. If we could do this, then the flg-FORIH could 
be readily adapted to run with (not on) an OS-9. 
I-evel I system, and I think that FF9 could also be 
converted. Don't write to me asking for more 
details, since I cannot do It; I am only suggesting 
that someone more skilled In OS-9 could tiy It. If It 
works, there might be a small market; you won't get 
rich, but you might make expenses while 
contributing to the general welfare. 



STRING CONSTANTS 

I have discovered a neat programming trick 
which I would like to pass along. It should work 
with any kind of FORIH for any CPU; It works with 
LMI Z-60 FORIH as well as with FF9. 

Some versions of FORIH for other CPUs have 
the capability of compiling string constants by 
enclosing the stilng with quotation marks or by 
using Ihe ." <strlng>" combination (FF9): 

CREATE TESr-STRTNC ." This Is a test" 

If you type 1EST-STRING COUNT TYPE . the 
stilng will appear on the display. Obviously, this Is 
of no value to anyone, but If you have need for 
default stilngs for use in a Ale, this Is a good way to 
generate them. Since I had such a need, and a need 
to be able to print out the string to show the data- 
entry operator what the default answer would be. I 
badly needed a reliable way to construct a long 
seiles of stilng constants. 

This Is when I realized that a definition using 
the ." " pair could solve both my problems. I defined 
a printable string In the conventional way: 

: .TEST-STRING ." This Is a test* ; 

I could then use the definition to show the clerk 
the default answer by simply Including .TEST- 
STRING in the appropriate woid. 
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Since the FORTH word ' (lick) puts tht 
compilation address of the next following word 
onto the Data Stack, I only needed to add the 
necessary offset to this address In order to have a 
pointer lo the first character In the desired string. 
Furthermore, this offset must be constant for all 
such definitions, so I had my reliable pointer to the 
string. In order to put this string on the disk I 
needed to use the following phrase: 

' .TEST-STRING 5 + 27 BLOCK 14 CMOVE 
UPDATE FLUSH 

This resulted In having the desired string stored 
onto the disk In screen #27. 

The impoitant key to this technique Is finding 
out the amount of the offset, which was 5 In my 
case. 1 expect that It would be 5 In practically all 
renditions of FORTH, but you should use DUMP on 
a suitable definition to verily this. Whatever you 
find this offset to be. It will always be the same 
until you change to a different FORTH. 

1 also found, by using DUMP . that there was 
only a 2-byte penalty for using ." Instead of ," . 
Therefore. I really got "something for nothing". 
since I was able to make one definition do the 
work of twol This certainly qualifies as a 
programming trick, since It cannot be guaranteed 
to be transportable, but It must be reliable if It can 
be made to work for you at all. 



CONSTANT versus LITERAL 

1 want to pass along another Up I picked up at 
the local FIC meeting. There was a group 
discussion about what makes up good FORTH 
programming practices, and several suggestions 
were offered which I hope to describe In detail. 
However, one suggestion was so good and so 
simple that I want to pass It along now. 

One member (a FORTH professional) suggested 
that whenever you were looking for speed In a 
definition, you should never use a LITERAL . He 
had found that he could make a program run faster 
if he defined all of his LITERAL numbers as 
CONSTANTS. 1 tested this when I got home and 
found that he was right! With a "bench mark" type 
of program, a definition had a measurably faster 
execution time If a number was predefined as a 
CONSTANT outside of the definition, rather than 
being used simply as that LITERAL number Inside 
the definition. For example, if you need to use the 
number 5 within a definition, first define It this 
way: 

5 CONSTANT 5 

This is similar to the old BASIC axiom that all 
numbers used more than once should be assigned 
to a variable at the first part of the program. We all 
know this, but It is easy to forget. 

The programmer who suggested this at the 
meeting further said that he now automatically 
defines all of the numbers 0-255 as CONSTANTS 
In all of his long programs, since he probably uses 
all of them at least once In any large proyaxnmln g 
effort. Probably, we who are amateurs don't need to 
go to this extreme, but our programs will run faster 
with Judicious use of this Idea. 



MORE ON STATE-SMART WORDS 

I received a letter from Wilson Federlcl the 
other day In which he rightly took me to task for 
giving the Impression that FORTH- 63 does not 
permit stale-smart words. I did not mean to sound 
like that In my complaint In the December, 1986. 
column: but I did come across a bit more strongly 
than I Intended. State- smartness Is definitely 
acceptable In FORTH-83: I Just got carried away In 
trying to make a point about some words being 
changed In a way which made them less 
convenient to use. 



BOOK REVIEW 

Mastering FORTH Anita Anderson & Martin 
Tracy Brady Communications Co.. Inc.. New York. 
1964 ISBN 0-69303-660-9 

In retrospect, I guess that I was too hard on 
Sterns Electronics for having such meager help for 
the FORTH novice In the Instruction manual 
accompanying Color-FORTH. I say this, not 
because I have decided that the manual Is 
adequate, but because I have since had an 
opportunity to examine some other commercial 
offerings, and I found those manuals were no 
better. 

Therefore. It Is necessary for the FORTH novice 
to plan on buying at least one textbook on the 
basics of FORTH programming. I think that I have 
found the one that I would recommend as being 
the best for beginners: "Mastering FORTH". It Is 
oriented toward the FORTH-83 dialect, but Is 
really useful for any version of FORTH. 

"Mastering FORITf ' covers In adequate detail all 
of the required words found In FORTH-83, but goes 
on to cover most of the others which the standard 
lists as optional. Each word Is described In the 
context of Its use. so that the examples do a veiy 
good Job of clarifying some of the more obscure 
definitions. The authors do a particularly good Job 
of explaining the meaning of state- smartness. 

They also cover the obvious requirements of 
explaining RPN math and the concept of Data 
(Paiameter) and Return Stacks. The explanation of 
how a definition header Is organized Is veiy useful, 
even if your FORTH has Its headers organized In a 
different order: at least you can learn why FOKni 
headers work. 

Each chapter ends with programming 
ejwrclses. with answers, which show you whether 
or not you really understand the contents of the 
chapter. Most of the exercises produce useful 
utility definitions or program fragments which can 
be used In practical programs. 

The only problem wtth the book Is that Its 
discussion of the editor Is too limited. It describes 
the use of a screen editor, which Is not generic. It 
appeai-s to be tied too closely to the MlcroMotlon 
editor, so may not be of much use to 68xx readers. 
But, the description of the general operation of a 
FORTH editor will be of help as a supplement to 
the editor Instructions with your own FORTH 
version. 

Also, you must be careful when reading the 
section on disk flies, since the authors assumed 
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that the whale world Is bound by CP/M. MS DOS. or 
PC DOS. The section on flies Is still useful, you just 
may not have all of the possible words they refer 
to. 

All In all. I rate "Mastering FORTH* very highly, 
and recommend It, particularly If you plan to buy 
only one book on FORTH. 



Figl. 

♦BUFS ( -- n > 

A CONSTANT which returns the number 
disk buffers. The default is 2. 

>BUFS ( — adr ) 

A CONSTANT which returns the address 
of the first disk buffer! fig-FORTH FIRST >. 

BLK ( a USER variable t 

Contains the address of the BLOCK 
being interpreted. 

BLOCK ( u — adr ) 

Returns the address of the disk 
buffer to the Data Stack and reads the data 
from block "u" to "adr" if it is not already 
there. 

BUFFER ( u — adr ) 

Same as BLOCK , but the disk buffer 
contains garbage. 

BUFSIZ ( — n ) 

Returns the total number of bytes 
required for a disk buffer. 

DRO ( — ) 
DR1 ( — ) 

Selects the appropriate disk drive by 
preloading OFFSET . 

The value in OFFSET is added to BLOCK 
number to allow for this selection. 

DSKERR ( a USER variable ) 

Error code from last execution of 
RDWT . Defaults to 0. 

EMPTY-BUFFERS ( — ) 

Mark all blocks as empty. FF9 fills 
all buffers with BL . Does not write UPDATEd 
buffers to the disk. 

FLUSH ( — > 

Executes SAVE-BUFFERS and deallocates 
all disk buffers. 

LIST ( n — ) 

Display the ASCII text of screen "n". 
Load "n" into SCR . 

IiOAD ( n — ) 

Interpret screen "n". Interpretation 
will stop at the end of the screen. 



OFFSET ( a USER variable ) 

Contains the offset added to the 
block number to cause the selection of the 
proper disk drive. 

PREV ( a USER variable ) 

Contains the address of the most 
recently used disk buffer. 

R/W ( adr u ? — ) 

Executes RDWT and stores error code 
in DSKERR . Aborts with message on error. 

RDWT ( adr u ? — error-code > Access codes 
for R/W : 

? - 0: Writes data at "adr" to 

disk block "u". 

? <> 0: Reads data from disk 
block "u" to "adr". Returns error-code or 
for no error. 

SAVE-BOFFERS ( -- ) 

Write all UPDATEd buffers to disk. 

SCR { a USER variable ) 

Contains the screen number most 
recently referenced by LIST . 

UPDATE ( — > 

Hark last-referenced block as having 
been modified. 

Figure 1: FF9 disk words. 



Fig 2. 



+BUF 

7LOADING 
B/BUF 
B/SCR 

BLOCK-READ 
BLOCK-WRITE 
FIRST 
MESSAGE 
USE 

WARNING 
FF9. 



Not used in FF9. 
Not used in FF9. 
Similar to BUFSIZ in FF9. 
Not used in FF9. 
Not used in FF9. 
Not used in FF9. 
Equivalent to >BUFS in FF9. 
Not used in FF9. 
Not used in FF9. 
Has a different meaning in 



Figure 2: fig-FORTH disk words at variance 
with FF9. 

EOF 



FOR THOSE WHO 
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SOFTOOLS 



By:ArtWeller 



A software bonanza! 

Everything you might need 

more than two dozen excellent 

utility programs 

based on the book 

"Software Tools in fVsca)" 

by Kemighan and Plauger. 

adapted to the 

**FLEX9 environment 

added further enhancements 

a very usable package 

for **FLEX users 

you just can't do without! 



A software bonanza! That's the only way to describe 
the SOFTOOLS program set by Martin Gregoria. 
Everything you ever thought you might need to work with 
text tiles, consisting ot more than two dozen excellent 
utility programs based on the book 'Software Tools in 
Pascal" by Kernighan and Plauger. Martin has adapted 
these to the "FLEX9 environment and added some 
further enhancements that make these a very usable 
package for "FLEX users - you are certain to find 
something in this set that you just can! do without. Many 
of these are nice enough to use as the basis for a 
separate software review, but I doubt that Don will want 
to double the size of this issue, so I'll have to just hit the 
highlights in a summary. 

To start at the beginning, the set includes a very 
good "READ-ME" file that contains all the needed 
instructions to get set up and running. The most 



important of these deal with the matter of printing out a 
hard copy manual for the SOFTOOLS set. Since the set 
includes a text formatter (more on h later), h creates its 
own manual. As supplied, the documentation prints out to 
a printer having a "compressed' mode of 132 characters 
per line. But rf your printer does not, there are 
instructions on how to muddle through anyhow. An initial 
chore in getting set up is to process a configuration 
program that generates a file of parameters for your 
printer and terminal display unit. This file is then 
appended to the programs that need it (HEX, PAGE, 
SCREEN, TPROC) thereof "customizing" them to the 
requirements of your system This need only be done 
once, unless you later change hardware. This is just as 
well, as I found it to be the exception in that CONFIG was 
rather tedious to use. 

Having printed out the user manual, you will see that 
each program has been given its own section and the 
how-to-use is clearly and explicitly presented, including 
examples where this is needed to help clarify meaning. 

Before getting to individual programs, a few 
comments that apply to all are in order. All have been 
compiled using "PI./9. so are more compact and faster 
than otherwise expected. All that use command line 
parameters have a default mode in which omission of the 
parameters will provide a small "help" display showing the 
syntax or brief explanation as a memory jogger for 
programs that might be used infrequently. 'PL/9 source 
code is available and in itself constitutes a valuable 
library of *PL/9 procedures. A degree of redirection is 
provided so that input might be from a file or from a 
keyboard and output to VDU, file or printer. The latter is 
further enhanced by switching parameters automatically 
when going from screen to printer (ie a 'page' changes 
from 23 lines to 66 lines, assuming that's how you 
originally configured), so that all output gets a degree of 
formatting. "FLEX pause and TTYSET parameters are 
properly handled, too. 

Several of the programs incorporate a pattern 
recognition feature that is more versatile than most. The 
usual 'wild card" is allowed and also a range of 
characters may be specified. For example, you can 
search for lower case alpha [a-z] or a sub-set of lower 
case [m-p], etc. An "escape character' is included to 
permit, for example, command line characters that 
"FLEX would otherwise discard (eg space or comma). 
Further, matching may be constrained to the beginning of 
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a line or end of a line (or NOT at the beginning or end). A 
feature that is difficult to express in a few words is that 
this wide range of options can be used to define 
"fragments" up to nine of which may then be used to 
construct a "pattern* for a search or replace operation 
giving the user an impressive degree of "FLEXbility that 
is at first overwhelming. Rest assured that pattern 
matching is covered more extensively and clearly in the 
SOFTOOLS manual than is this quick overview. Moving 
on to discuss these programs more specifically, the first 
makes use of the "pattern" feature. 

CHANGE <infile> <outlile> +trom to 

This is a function familiar in editors of all kinds, but 
CHANGE woiks at the command line level and on a whole 
file (globally). Assume you are trying to use some old 
routines in a new program and find some of the variable 
names dash. Just CHANGE theml 

CLEANTXT <infik» <outfile> +v 

This converts text files to standard "FLEX format 
by stripping non-printing characters. It's a "smart" 
conversion in that the <CR> is retained, <BS> deletes a 
prior character and <CAN> kills the current line (where 
these are defined in TTYSET). A (v)erify option displays 
each line changed and reports on the changes made. 

COMMON <filef > <file2> <outfile> +n keyfiekfs 

Compares the contents of two input files, reporting 
the results in the output file as to whether the lines 
matched or not. Obviously the pair of input files must be 
in order. The match can be modified by parameters in up 
to 10 key fields. This program could be used to build your 
personal dictionary and to compare text files against it 
for spelling. 

COMPARE <file1> <file2> 

A line-by-line comparison between two files in which 
identical lines are passed over and mismatched ones 
listed to screen. 

CONCAT <outfile> -t-einput file list> 

Simitar to the "FLEX APPEND, this forms several 
files into one sequentially, but can also be used to list 
files to screen. Note the difference in command line 
sequence. 

DOCUMENT <lrstof-input-files> <outf ile> -ftp 

This is a text file oriented program specifically 
designed for use with "PL/9 source files. (You all use 
"PL/9, donl you?). Input files are, obviously, the 'PL/9 
source and the output is the extracted lines. Default is to 
list the first line of the program file to terminal, but option 
*f" will suppress this, while option "p" extends the output 
to include procedure processing. I found it to be veiy 
useful for examining the parameter passing aspects of 
procedures. 

ECHO <outlile> +<argument list> 

Similar to a "FLEX program of the same name, this 
will echo the argument list to screen, but if the optional 
outfile is induded, the echo is to file. 



FIND <infile> <outfile> +pattem n 

If you have never used a 'find* command, the 
description of this is not likely to impress you. If you 
have, then youll appreciate the improvement that is 
provided by use of the 'pattern* matching I mentioned in 
the introduction above. Patterns can be constructed to 
make the matching as selective as needed, optimizing 
between being flooded with matches, and missing the 
desired one. You can use wild-cards, be case sensitive 
(or insensitive) or use FIND to extract lines to a file for 
use in another application. One of the best file searching 
tools I've used. 

HEX <inflils> +n 

Displaying the bytes of "intile" in hexadecimal and 
ASCII, this is a file dump program like many otheis; what 
more can I say. But everybody needs one. The option "n" 
permits skipping the first *n" bytes in a file, as a time 
saver. 

INCLUDE <infile> <outfile> +1 

This is another file manipulation program that is 
primarily oriented toward 'PL/9 files, though it could be 
used with others. The default is to merely copy infile to 
outfile, but if a line contains "include filename" then the 
program switches to copying "lilename" after which it 
returns to "infile". Any number of "indudes* can be used 
within the source file. If the "+l" option is specified then 
filename' is not actually copied, but the outfile will show 
each 'include filename" indented so as to show hierardiy 
structure. The primary application would be to generate 
an output file that contains the complete listing of all the 
code needed by a *PL/9 program. 

KWIC <infile> <outfile> 

This is an acronym for Key Word In Context, and 
operates on a text file by folding* lines so that each word 
is rotated one at a time, to the beginning of the line until 
all the words have been so shifted. By itself, this is of 
little value, but used in conjunction with other tools in this 
set (such as SORT) allows for a detailed examination of 
the file's structure. 

LISTDIR <drive> <outfile> +hd 

A substitute for CAT, this is a minimal directory 
listing. In all honesty, if you have Leo Taylor's CAT 
command, you'll not be impressed with this one. 
Included for completeness. 

MEMSORT <infile> <outf ile> -tkeyfiekfs 

A high speed text file sorter with lots of options. 
Case of alpha characters may, optionally, be ignored and 
sort may be in ascending or descending order. As many 
as 10 sort fields may be specified. File sizes are limited 
by memory constraints, but see SORT for larger files. 
MEMSORT is very fast. 

MULTICOL <infile> <outfHa> -t-h-0 w>79 c-2 d-20 

If you work with text files, you must have this. How 
many times have you had information that you thought 
would look better listed more than one column to a page, 
but which you wanted to read down rather than across. A 
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very difficult chore with most editors, but extremely 
simple with MULTICOL Space tor page headings maybe 
reserved, the width of columns and the number of 
columns may be specified. Lines per page may range 
from 5 to 78. 

PAGE <input> +nw-80 d-66 

This prints text files with page headings and is very 
similar to the familiar LIST, but with added options of 
specifying the page width and depth on the command 
line. Before saying "ho-hum" you should remember that 
this is one of the "smart" programs noted above that 
"Knows" whether it Is talking to the screen or to the printer 
and adjusts output accordingly, to include issuing 
appropriate printer control codes. 

REMOVE <file list> 

A fast disk file deletion program, this removes the 
files specified on the command line. A "watch out"; no 
prompts are issued, it just zaps them I 

SCREEN <intile> +n 

Another list utility, this conforms with the parameters 
specified during the configuration session. Word-wraps 
text to match your screen width and pauses for each 
screen full. Screen depth may be altered at run time 
using a command line option. 

SORT <dntile> <outfile> -t-keylields 

A real gem. this is a super version of MEMSORT 
mentioned above. Still has the ascending/descending 
sort option, up to 10 keys, case over-ride, sort on nth 
word and sort on n characters and. if the file is small 
enough, sorting is done in RAM. But files up to your full 
disk capacity can be handled by SORT. The large files 
are automatically sorted into a series of smaller files 
stored temporarily on disk, then these are merged into a 
final sorted file. 

TPROC <infile> <outfile> +s-0 e-10000 

A small, but competent text formatter, TPROC is 
used very effectively in producing the printed 
documentation of the SOFTOOLS user manual. 
Formatting directives are identified by a period (full stop 
in the UK!) in the first character position of a line, then 
two or more characters identify the desired action. Text 
may not be included on these lines. Headers, footers, 
indenting, paragraphing, justification, page length -- in 
fact a full complement of formatting options are available 
as are a subset of printer command options. No "macro" 
capability is included, nor is "mail merge" supported, but 
input from the terminal is allowed and the ability to 
"include" specified external files into the runstream give 
enough "FLEXibility to perform these functions in a low 
volume environment. Notice that this, too, is one of the 
"smart" programs, outputting printer control codes only 
when actually sending to the printer and even checking 
the line width, then resetting the printer to compressed 
mode if needed. 

TRANSLIT <infile> <oputfile> +f romset toset n 

FOR THOSE WHO\ 



While reading the input, character by character, 
TRANSLIT converts text that matches "tromset" to 
"toset" in the output. Line numbers may be, optionally, 
added to the output. More than just a straight character 
substitution, applications may be hard to visualize. So to 
give an example, suppose all the words in a text file were 
to be broken out on separate lines by adding a <er> after 
each. Then by sorting and removing duplicates this could 
easily form the basis for a personalized dictionary for use 
with a spelling checker. 

UNIQUE <infile> <outfile> +x keyfields 

After the "infile" has been sorted. UNIQUE may be 
used to check for duplication between adjacent lines. A 
single "unique" line will then be output. Optionally, the 
number of duplicates may be reported (as in a word 
count) and the comparison may be based on up to 10 
keyfields with key field specifications including all the 
same "'FLEXibility as with SORT . It could also, 
obviously, be applied to an unsorted file to learn if any 
adjacent lines were identical. 

UNROTATE <infile> <outfile> 

Used in conjunction with KWIC, UNROTATE reads 
the input file a line at a time and outputs an "unfolded" 
version in which each line has been formatted to display 
each word, showing the context in which it is used. If the 
input file has been sorted, the words will be presented in 
sequence. 

WC <infile> <outlile> +w 

An acronym for 'word count", WC will count the 
"words" contained in the input file; where "words" may be 
characters, lines, or words. That is, a sequence of 
characters separated by a space, tab, or <cr>. A word 
count is the default, with "lines" or "characters* optionally 
with a +L or +C. The infile is not listed to the output, only a 
report of the number of items found. Notice that the 
definition of "word" includes things we donl usually call 
words; for example, a date or a number. 

There they are. I can't resist the temptation of 
commenting that the conversion of these programs to 
*PU9 makes them noticeably superior to the originals in 
Pascal. They are more compact, using less code (and, 
of course, no run-time interpreter) and a lot faster. 



By: 

Art Weller ■ 



El Paso, Tx 



* It should be noted lhat PL/9 is not necessary in 
order to run the programs. PL/9 was the compiler used lo 
compile the programs lo object code. They run as any 
other ".CMD" command file. 

**ln most instances references to FLEX will also 
apply to SK*DOS, 



EOF 



TO h\()\\ 
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33383 Lynn Avenue, Abbotsford, 

British Columbia, CANADA V2S 1E2 

& Computer Publishing, Inc. (CPI) © 1 987 

The material in this article is copyrighted try Micronics Research Corp. & Computer Publishing, Inc. (CPI), 
and reproduction, in whole or in part, by any means is prohibited without the express written permission of the 
author and CPI. 

Introduction 

XBASIC is a language which enables the "speaker" to communicate with his computer. He 
can restrict its use to simply persuading this alien device to print "Hello", or become so proficient in 
the more subtle points of its grammar that he can almost train it to sit up and beg on command. The 
article supplied by TSC to purchasers of XBASIC, although very well written, is really equivalent 
to a high-level dictionary wherein one may find definitions of each and every word in the language. 
It's not meant to be a tutorial on how to program in the BASIC language, though certain aspects are 
covered in some detail, in particular the section dealing with data file structures and how to move 
data in and out of those files. Just as with any other natural language, however, a dictionary may 
enable one - with some effort - to construct sentences of the order of "Please, to bathroom this is 
way, no?", but will hardly suffice to carry on a sophisticated scientific discussion. So too with 
TSC's article, which admirably suits its purpose of giving a newcomer a feel for the language and 
getting him going. In this series we hope to pick up where they left off. 

Several years ago, just for the fun of it, I spent quite some dme disassembling BY HAND an 
early version of FLEX2 XBASIC, and then, about the middle of 1985, 1 had need to use this as a 
reference for FLEX9 XBASIC in order to incorporate into the language a new command, "EDIT", 
whereby I could edit any line in a program - without having to re-type the whole line in case of 
error. This led to my submitting to 68 Micro Journal a series of letters explaining in some detail my 
experiences with various aspects of the language. In turn, this produced correspondence with 
readers all over the world, prompting even further submissions over quite a long period. 

The time is now ripe, I think, to gather all these letters into one compact tutorial for the benefit 
of newcomers to the 68xx(x) microcomputer scene, and hopefully some of the expanded 
explanations may be useful even to those readers who have earlier read my original series of letters. 

SOME COMMENTS 

Before I get down to the "nitty-gritdes" though, I would like to give some advice to those who 
have tried writing a not-so-small program in XBASIC. You see, there are several schools of 
thought on the best way to write such programs - - some people, mostly theoretical types, will 
advocate a system known as "top-down", others "bottom-up", others won't even consider a 
program that isn't "structured", while others would rather die than use that much-maligned word 
'GOTO' in a program. 

We have no time for such concepts - what we wish to do here is to make XBASIC easy and 
painless to use. Then, when we have a thorough grasp of its principles, we can take a look at those 
other ideas, and make a reasoned judgment, based on knowledge, as to whether they will serve any 
useful purpose FOR US. No matter that the other guy swears that his is the only way to true 
salvadon! To each his own! 

Continued on page 38 
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K-BASIC 

K-BASIC under OS-9, FLEX or SK*DOS will compile 
TSC BASIC, XBASIC and XPC Source Code Files 

K-BASIC now makes the multitude of TSC XBASIC Software 
available for use under OS-9. Transfer your favorite BASIC 
Programs to OS-9, compile them, Assemble them, and BINGO 
-- useable, multi-precision, familiar Software is running under 
favorite Operating System! 
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Sculptor for 68020 
OS.9 & UniFLEX 
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DISASSEMBLERS 

SUPER SLEtTH (ran Compiler Systems Contuluuiu Interactive 
Disassembler extremely POWERFUL! Disk File Binary/ASCI] 
EtamJne/Qiange, Absolute or FUU. Disassembly. XR£f 
Generator. Label "None Changer", and Filet of "Standard Laid 
Names* for different Operating Systems. 

Color Computer SS.SO Bus fall ** AL. Source) 

CCO (J2K Read) Obi. Only S49.00 

F, S. 19900 - CCF. Obi, Only SS0.00 U. tlOOOO 

CCF.wiSourte S99MO.SI0IM 

CCO. Ob). Only S50M 

OS9 68K Obi. S100M urSource S200M 
DYNAMITE* - Excellent standard "Batch Mode" DiiasaEmaler. 
Includes XR£F Generator and 'Sundtrd Lanel" Filet. Special OS 
9 options w/OS-9 Version. 

CCF. Ob/. Only SIMM . CCO. Obj. $ 59SS 

F,S. ' • H00O0 . O, object only S150.00 

V. " ' VMM 

PROGRAMMING LANGUAGES 

PL/9 from W'mdrush Micro Syilemi - By Graham Troa. A 
combination Editor Compiler Debugger. Oinxs source -to-object 
compilation delivering fut. compact, re-entrant, ROM-able. 
PIC. 8 A 16-bit Integcn A 6-digil Real number* for all real- 
world problems. Direct control over ALL System resources, 
including interrupt*. Com prehen five library support; simple 
Machine Code inirifacc; Hep-by-ticp tiaocr for initant 
debugging. 500+ page Manila) with tuuyial guide. 
F. 5, CCF - S19»M 

PASC from S E. Media - A FLEX9. SK'DOS Compiler with a 
tkfsiiie Pascal "flavor". Anyone with a bit of Pascal experience 
should be able to begin uiuig PASC lo good effect in shod 
order. Hie PASC package comet aanpleie with three tampte 
programi: ED (a syntax or unicorn: editor). EDITOR (a simple, 
public domain, screen editor) and CHESS (a simple dieti 
program). The PASC package come complete with kxiik 
(written in PASC) and iiunouum. 
FLEX.SK'OOS S95M 

WHIMSICAL from S.E. MEDIA Now suppnru Real Number,. 
"Suuaured Programming" WITHOUT losing tie Speed and 
Control of Assembly Language! Single-pus Compiler features 
unified, user-defined I/O; produces ROMable Code; Procedures 
and Modules (including pre -com piled Modules); many Types" 
up to 32 bit Integers, 6-digii Real Numbers, unlimited sized 
Arrays (vaetort oily); (utemspi handling; long Variable Names; 
Variable Initialization; Include directive; Condiiional 
cxirocHling: direct Cone insertion; control of the Stack Pointer, 
etc Run-Tune subroutines inserted as called dining 

compilation. Normally product! 10% lus code tnan PU9. 
F.Sand CCF - SI95M 



KANSAS CITY BASIC from S.E Media - Basic for Color 
Computer OS-9 with many new commands and sub- function 
added A full hnpiomcoiauan of the IF-THEN-ELSE togk is 
included, allowing nesting lo 255 levels. Strings are supported 
and a subset of tic usual string functions such as LEFTS. 
RIGHTS. MTDS, STRINGS, etc. are included. Variables are 
dynamically allocated. Also included are additional features such 
as Peek nd hike. A must for any Color Qarjpulcr user running 
OS-9. 

CoCoOS-9 11995 

C Compter fhaas Waadrttai Micro SrxtenB by lames 
McCotfc. FuD C for FLEX. SK'DOS except bitfields. (Deluding 
an Assembler. Require, the TSC Relocating Assembler if user 
desires lo implement Kit awn Libraries. 
F.Sand CCF -1295.00 

C Compiler from Intro! - Full C except Doublet and Bit Fields, 
tuearnlirrcd for the 6809. Reliable Compiler. FAST, efficient 
Code. More UNDC Compatible than most. 

FLEX . SK* DOS. CCF, OS-9 (Level II ONLY). U - SS7SM 

PASCAL Compiler from Uiddata - ISO Baaed P^ode 
Compiler. Designed especially for Micrwanputer Syrians. 
AUow, Imluge to Assembler Code for maximum flexibility. 
F, S and CCF y- S9995 F. S f - S99S5 

PASCAL Compiler from OmegaSoft (now Certified Software) - 
- For the PROFESSIONAL; ISO Baaed. Native Code Compikt. 
Pnnahry for Real-Tune and Process Control appjialim. 
rVnrcrrul; Flexible. Requites a "Motorola Compatible" Relo. 
Asrab. and Linking Loader. 

F, Sand CCF -S415M One Year Mainl SIOOM 
OS 9 68000 Version - 1900 00 

KAAS1C - from S£. MEDIA - A "Native Code' BASIC Comport 
which ii raw Fully TSC XHA53C coropuiMt The cempuer 
compiles lo Assembly Language Source Code. A NEW, 
rueamlinad. Assembler is now included allowing the assembly 
of LARGE Compiled K-BASIC Piograms. Conditional assembly 
miim Run-time package 

FLBf. SK+DOS, CCF, OS-9 Compiler /Assembler SI99M 

CRUNCH COBOL from S.E MEDIA - Supports large subset of 
ANSTJ Level I COBOL with many of the useful Level 2 features. 
Full FLEX. SK'DOS File Stiuouro, including Random Fdes and 
die ability u> process Keyed Files. Segment and link large 
programs at runtime, or implemented as a set of overlays. The 
System requires 56 K and CAN be run with a single Disk System. 
A very popular product. 

FLEX. SK'DOS, CCF; Normally $199 00 
Special Introductory Price 199.95 

FORTH from Stearns ekxtrtmlca A CoCo FORIH 

PrugTcmming Language. Tailored to the CoCol Supplied on 
Tape, transferable to disk. Written in FAST ML, Many CoCo 
functions (Graphics, Sound, etc.). Includes an Editor. Tiacc, etc 
Provides CPU Carry Flag accessibility. Fast Task Multiplexing, 
dean Interrupt Handling, etc. for the "Pro". Excellent 
'toolt 
Color Computer ONLY ■ S56.95 
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DATABASE ACCOUNTING 

XDMS ttvm Weatdaeater Applied Suttnaa. Systems 

POR 6809 FLEX-SK»DOS(5/8*) 

Up to 32 grottps/Ticids per recced I Up to 12 dimeter Tiled namel Up 
■o 1024 byte records! Uier defined screen and print control! 
Piocen IUe*1 Form fdeil Conditions) execution! Proea! 
chaining! Upward/Downwind file linking! File joining! Random 
file virtual paging! Built in militia! Buili in text tine editor! 
Fully Hiilai dialled! Enhanced fomul Boldface, Double 
width, Italic? and Underline supported! Written in compact 
suucnmd aiaemblerl buegiaied for FAST execution! 

XDMS IV Data Management Sy«em 

XDMS-TV Li a brand new approach to data managcroaa. U not only 
permits uicn lo describe, enter and retrieve data, but alio to 
process entire filet cvuducing oisfranisd rejartts, screen 
displays and Tile output Processing can coniift of any of • let 
of standard high level functiou including mid and field 
selection, sorting and aggregation, lookup! in other f Oca. 
•pedal processing of record subsets, outran report formatting, 
totaling and subtouluig, and presentation of up to tbiec iclaied 
filer at a "database" on uier defined output report!. 

POWERFUL COMMANDS I 

XDMS-IV ccrnbinet the functionality of many popular DBMS 
software lyiiemt with a new eaiy to ute command set into a 
tingle integrated package. We've included many new features and 
aanmandl including a let of general file utilities. The 
processing commands arc lnput-Pmocti-Ortpui (IPO) oriente 
which allowi almost instant imptenanuaiiw of a process 
design. 

SESSION ORIENTED I 

XDMS-IV it session oriented Enter "XDMS" and you are in instant 
commend of all the feature*. No men waiting for a cssnmand to 
load in from disk! Many commands arc immediate, such as 
CREATE (TJe definition). UPDATE (file editor). PURGE and 
DELETB (utilities). Others are proceii commands which are used 
in create a user protest which ii executed with a RUN command. 
Either may be entered into a "proceii" file which is exeanad by 
an EXECUTE ilateroenL Proceiiei may execute other procziaea. 
or themselves, either conditionally or istccndriionatty. Menus 
and screen prompts are easily coded, and entire user applications 
cm be run vithoui ever leaving XDMS-IV 

ITS EASY TO USEI 

XDMS-IV keep* data management simple! Rather than design a 
oomptex DBMS which hides the true nature of the data, we kept 
XDMS-IV fOe oriented. The user view of data relationships is 
presented 1 in reports and screen cuput, while the actual data 
resides in eaiy lo maiauin files. This aspect permits customized 
presenlalksa and reports without complex redeJainicm of the 
database filet and structure. XDMS-IV may be used for a wide 
range of applications from simple racoid management systems 
(addresses, inventory ...) lo integrated database ryitems (order 
entry, arnainling. ..) 

The pnssihilitiea are unlimited. 
FOR 6809 FLEX SK»DOS(S/S") 1149.95 



ASSEMBLERS 

ASTRUK09 non SE Media - A "Structural Alton bier for the 
6809* which requires the TSC Macro Assembler. 
F . S. CCF ■ S99.9S 
Macro Assembler for TSC - The FLEX. SK'DOS STANDARD 
Assembler. 

Sptciai ■■ CCF VSM; F, S tSOM 
OSM Extended 6809 Macro Assembler from Lloyd I/O. - Provvks 
local labels. Motorola S-reeordi, and Intel Hex records; XREF. 
GencOrate OS 9 Memory modules under FLEX. SK*DOS. 
FLEX. SK'DOS. CCF. OS-9 19900 
Reka-ailng Aaaem bier/Llnklng Loader from TSC. - Use win 
many of the C and Pascal Ccropilers. 
F . S, CCF SHOW 
MACE, by Graham Trod from Wodrush Micro Systems - Co> 
Resident Editor and A nan Her. fast nceraclive A.L 
Ptu gi wn uii ii g for small lo medium sisad Programs. 
F, S. CCF . mm 
XMACE - MACE w/Crost Assembler for 6800/1/2/3/8 
F . S. CCF - S98M 

CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Computer Systcmi 
Consukama - Supports 1802/5. Z-80. 6800/1/2/3/8/1 1/IIC11, 
6804. 68Q5/HC05/ 146805. 6809/00/01. 6502 family. BQBO/5. 
6020/1/2/35*35/39/ 40/48,C48/49/C49/5O/8748/49. 

8031/51/8751. and 68000 Systems. Assembler and Listing 
formats same at target CPU't formal. Produces machine 
endepencent Mctonis S-TexL 

68000 or 6809 . FLEX. SK'DOS. CCF . 05-9. UniFLEX 
any object or tovrzt each - S50M 
any 3 ob/ta or somt tack - MOO CO 
Set of ALL object S100O0 . wltovm SSO0O0 

XASM Cross Asscmnteii for FLEX. SK'DOS from S.E. MEDIA • 
- Tbii let of 6800/1/2/3/5/8. 6301. 6502. 8080/5. and Z80 
Ctott Atsemblen uset Ihe familiar TSC Macro Aitembler 
Ctwnjnand Line and Source Code format, Atsemblcr options, 
etc.. m ntoviding code for ihe target CPUs 

Corpleu art, FLEX. SK'DOS only . SIMM 

CRASMB from LLOYD (JO - Suppotu Motorola's. Intel i, Zilog'i, 
end other' i CPU lynlax for these 8-Bit mrnrjrprocEiscn : 6800, 
6801. 6303. 6804. 6805, 6809. 6811 (all varieties); 6502, 
1802/5, 8048 family. 8051 family. B08CV85. Z8. Z80. and 
TMS-7000 family. Has MACROS. Local Labels. Label X- 

REF. Label Length to 30 Chars. Object code formats: 
Motorola S Records (text). Intel HEX-Records (leal). OS9 
(binary), and F1EX. SK'DOS (binary). Wtitlen in Assembler ... 
eg. Very Kail 
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CPU TYPE - Prtc* each: 
For motokola orru. otku 

FLEX9 5150 S1S0 S1S0 S399 

SK'OOS S150 S150 S1S0 S399 

OS9/6809 SI50 SI50 S150 S399 

OS9ft8K $432 

CRASMB 1632 from LLOYD IAO - S«rjpoTU Motorola'* 68000, 
and ha* *ame feature! at the 8 bit vetiioji. OS9/68K Object 
code Formal tUowi lhi< ctosi a*<embler la be used in 
developing your programs for OS9/68K on your OS9/6809 
computer. 

FLEX. SK*DOS. CCF. OS-9/6809 S249M 

UTILITIES 

B*dc09 XRef from SB. Media Thi* Baac09 CroM 

Reference Uliliiy i» ■ B*«k09 Program which will produce • 
"putty primed" lilting with each line numbered, followed by 
• complete croai referenced lifting of all vaiiablet, external 
procedure*, and line number* called. Alio include* a 
Program LiM Utility which output* a fan "pretty pirated" 
lining with line nianhcn. Require* 8a*ic09 orRunB. 
O * CCO obj. only ■■ t39 9S: wt Sort* . S79.9S 

BTree Routine* ■ Compkle *ct of routin to allow aimple 
■nplemenuition of keyed file* - for fur program* - running 
under Ba*ic09. A real time lavex and thould be a pan of 
every tehoiu propwnmer* tool-box. 
A CCO «*/. oa/y • S89.9S 

Luddata PASCAL UTILITIES (Require* Ratal ver 3) 

XREF - produen a Cro*i Reference Lilting of any text; orirrtnd 
to rWal Soiree. 

INCLUDE - Include other File* in a Sourer Text, including 
Binary ■ unlimitad outing. 

PROFILER - provide* an Indented, Numbered, "Slruorajrarn " of 
a Patcal Source Text File; view the overall atructure of large 
program*, program integrity, etc. Supplied in Patcal Source 
Code; require* compilation. 

F, S. CCF - EACH $• ■ S4000. f - S50M 

DUB from SB. Media - A UnlFLEX BASIC decompiler Re- 
create a Source Luting from UrufLEX Compiled basic 
Ptogram*. Work* w/ ALL Vertton* of 6809 UnlFLEX batic. 
U - BI9.9S 



LOW COST PROGRAM KITS from Southeast Media 
The following kit* are available for FLEX. SK'DOS on 
either 5" at 8" Diat, 

1. BASIC TOOL-CHEST S29.95 
BL1STER.CMD-. preny primer 
UNEXREF.BAS: line crcaa-reftroncer 
REMPACBAS. SPCPAC.BAS. COMPAC BAS: 
remove cupe/fluou* code 

STRIP .BAS: nrprrfluau* line-nrmben Onpcer 

2. FLEX, SK*DOS UTILITIES KIT 09S9 
CATS. CMD: alphaboialty -toned directory lining 




CATD.CMD-. date-toned dircoory liaung, 
COPYSORTCMD: file copy, alpruhnicalry 
COPYDATE.CMD: fOc copy, by date-order 
FILEDATE.CMD: change file creation dale 
INFO CMD (4 0NFOGMX.CMD): tell* diafc 
& content* 

R£liNK.CMD (A RELINK 82): re-order* fragmented free 
chain 

R£SQ CMD: undelete* (recover*) a deleted file 
SECTORS.CMD: thow aacux order in free chain 
XLCMD: iuper text User 
ASSEMBLERS/DISASSEMBLERS UnLITIES 

$39.93 
UNEFEBD.CMD: WsiUriic' disa*«ernbter outpa 
MATH. CMD: drornaL hex, binary, octal curvenkm 

A utile* 
SKIP .CMD: column ortppcr 
WORD - PROCESSOR SUPPORT UTILITIES 

I49.9S 
FULLSTOP.CMD: check* for capitalization whne 
required 
BSTYCJTBAS ( BAC)c Stylo to dot-matrix printer 



NBCPRINT.CMD: Stylo to doc -matrix printer fiher code 

UnLfllES FOR INDEXINC t*93S 

MENU.BAS: arJock required program from lilt below 

INDEX BAC: word index 

PHRASES BAC: phrue index 

CONTENT. BAC uhk of contcnu 

INDXSORT.B AC: faat alp>ahaic ion routine 

FORMA TER BAG produce* a 2-cokiron foranaoed index 

APVEMD.BAC: append any numbta of file* 

CHAR BIN: line reader 



BASIC09 TOOLS conaia of 21 uSuxm> for Baaic09. 
6 wens wrinoi in C Language and the remainder in cuaanbty. 
All die routine* are compiled down to native machine code which 
make* them fad and cornpaa. 

1. CFTLL - fill* a tiring with character* 

2. DPEEK - Oouhle peek 

3. DPOKE - Double poke 

4. FPOS - Current file pcaiuon 

5. FSIZE - File >iie 

6. FfRlM ~ rtjnova leading (pace* from a osing 

7. GErPR - return* the current pro** ID 

8. CETOPT - get* 32 byte option tecbon 

9. GETISR - get* the uaer ID 

10. CTIME - get* the time 

11. INSERT - buert a Bring into another 

12. LOWER -- convert* a nring into iowcrcaaE 

13. READY - Check* for available input 

14. SEITRIOR - change* a prnni priority 

15. SETUSR - change* the uaer ID 

16. SErOPr - tet 32 byte opuon packet 

17. STTME - act* the time 

18. SPACE - add* apace* to a nring 



o . oa-*, I . IK'DCM 
F • FLEX, U • UalUJUt 
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19. SWAP - swaps «y (wo variables 

2a SYSCALL - system call 

21. UPPER - converts • Ming to i^khuc 

Fur OS-9 • (44-95 ■ Includes Soon Code 
See Rertew la Jiniurj 1987 fam 68 MJon> Journal 



SOFTOOLS 

The fofWing prug>>>'<< lie included in object form for ^— ~»K«i» 

seasticatism PU9 source code included for ctiooniizaiiaD, 

README Canflnt instructions for initial tet-ap tad 

operation. Can oven be primal out with the included tat 

proems. 
CONFIG one time system cenftgunucn. 
CHANGE ctunfet wordi. characters, etc. globally to eny text 

type file. 
CLEAMTXT eonveru leu file, to standard FLEX. SK'DOS 

Gk*. 
COMMON ctxnpare t«o text filet tad reports differences. 
COMPARE mother check file that repecu tnumadiol tines. 
CONCAT similar to FLEX. SK'DOS append but can alio (in 

files to screen. 
DOCUMENT for PL/9 lource fifes. Vesy useful in examining 

paramour pasting aspects of procedures. 
ECHO ecboa to eilher screen or Ilk. 
FIND an improve laid command with "paccm" matching and 

wildcards. Very lueM. 
HEX dumps tiki in both hot and ASCU 
INCLUDE a file copy program thai will accept "includes" of 

other disk Tiki. 
KWIC allows rotating cad) wad, on each line to the beginning. 

Very umtvt in a ton program, etc 
LISTDIR a directory lining program. Not super, but bener than 

CAT. 
MEMSORT a high-speed leu ftk acner. Up to 10 fields may be 

tonal Very faa. Vay useful. 
MULTICOL width of page, number of coJuami may be 

■naTied A MUST) 
PAGE similar to LIST but allowi for t page header, page width 

end depth. Adjutt for CRT acjeen or printer at act up by 

CONFIG. A very smart print driver. Allowi piintcr control 

ccfnmaflda. 
REMOVE t fas ftk deleter. Careful, no prompt! issued Zap. 

Kid ki gonel 
SCREEN a screen listing utility. Wcad wrapt text to fit screen 

Screen depth may be thcrcd at ran lima. 
SORT a super vtzvon of MEMSORT. KjjxnLn^Aaccn ding 

order, up lo 10 keys, cue over-ride, ton on nth won) and 

son on characters if file it small enough, aoiu in RAM. If 

large fik. son is constrained to size of your largest disk 

capacity. 
TPROC a small but nice leal formaotx. This is a complete 

foonaoer and has functions not found in ether rmrntaen 
TRANSLIT toAt a fik by x keyfkld*. Checks for rarpliratiran. 

Up lo 10 key Tiki may be used 



UNROTATE used with KWIC this program reads an input ftk 
and unfolds it a line at a time. If the ftk has been sorted 
each word will be presented in sequence. 

WC a word count utility. Can count words, characters or lines. 
SPECIAL INTRO PRICE: 
FLEX - SK'DOS 

FULL SCREEN FORMS DISPLAY from Compuier Syttsns 
Consultant - TSC Extended BASIC program supports any 
Serial Terminal with Cursor Control or Memory-Mapped 
Video Displays; substantial! y extends the capabilities of the 
Program Designer by providing a table-driven method of 
describing and using Bill Screen Displays. 

F.Sand CCF. V - S25M, W Sam - V000 

SOLVE from SB Media ■ OS-9 Levels I and U ojOy. A 
Symbolic Object/Logic Verification t Examine debugger. 
Including inline debugging, disassemble and assemble. 
SOLVE IS THE MOST COMPLE1 E DEBUGGER we have seen 
for the 6809 OS-9 series! SOLVE does it all) With a rich 
selection of monitor, astcmbkr, disassembler, 

enviroruneri ttl. execution and other miscellaneous 
commands. SOLVE is the MOST POWERFUL tool -kit item 
you can ownl Yet, SOLVE is simple to usel With complae 
dssavnauaii on, a inapt Everyone who has ordered this 
package lias ravedl See review - 68 Micro Journal - 

December 1985. No tdind' debugging bete, full 
displays, rich and complete in information presented. 
review in 68 Micro Journal, this is our fasten moverl 
Levels 1 All only OS-9 Rtgular 1149.95 
SPECIAL INTRODUCnON OFFER S69.9S 



DISK UTILITIES 

OS-9 VDtat from S.E Media - For Level I only. Use the 
blended Mumry capability of your SWTPC or Grain CPU 
card (or similar formal DAT) for FAST Program Compiles. 
CMD execution, high speed inter-process cornmun tcations 
(without pipe buffers), etc. - SAVE that System Memory. 
Virtual Disk size is variable in 4K inoeOments up to 960K. 
Some Assembly Requirad. 

f aval f OS-9 otj, 179.95; wr Sam* 1149 95 

O-F from S.E Media - Written in BASIC09 (with Source), 
includes: REFORMAT, a BASKZJ9 Prcajnan that reformat a 
chosen amount of an OS-9 disk lo FLEX, SK'DOS Format to 
it can be used normally by FLEX, SK'DOS: and FLEX, a 
BAS1C09 Program lhat does the actual read or write function 
to the special O-F Transfer Disk; user-friendly menu dr ven. 
Read the FLEX. SK'DOS Directory, Delete FLEX. SK'DOS 
Files, Copy both directions, etc. FLEX, SK'DOS users use 
the special disk just like any other FLEX, SK'DOS disk 
O 6809169000 S7995 
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1SORT from S.E. Media ■ A SORT/MERGE package for OS.9 
(Level I A B only). Soru records with fixed lengths or 
variable lengths. Allows for cilher ascending or descending 
son. Sorting can be done in cither ASCII sequence or 
alternate collating sequence. Right, left or no justification 
of data fields available. LSORT includes a full set of 
cemments and e/roo messages. 
OS-9 moo 

H1ER Iran S.E. Media - HIEK is a modem hierarchol storage 
system for users under FLEX, SK'DOS. It answen the needs 
of ihoae who have haid disk capabilities on their systems. 
or many files on one disk - any size. Using HI EH ■ 
regular (any) FLEX, SK'DOS disk (8 - S - hard 
disk) en have sub directories. By this method the 
proUems of assigning unique names to files is less 
burdensome. Different file* with the exact same name may 
be on the same disk, al long el they are in different 
dummies. For the Winchester user this bectmci a must. 
Sub-diraumcs are the modem day solution that all current 
large systems use. Each dlrertoi? looks to FLEX, 
SK'DOS like a regular file, except they have the 
Olmrion '.DB 1 . A full set of dimdory handling 

programs are included, making the operation of rfJER simple 
and suaightfoiwaid. A special install package is included to 
install KIER to your paiticular version of FLEX, SK'DOS. 
Some assembly required. Install indicates each byte or 
reference change needed. Typically - 6 byte change* in 
source (fumishad) and one assembly of H1ER is all that is 
required No programming required! 
FLEX ■ SK*OOS V9.95 

COPYMULT from S.E. Media ~ Copy LARGE Disks to several 
smaller due*. FLEX, SK'DOS utilities allow the backup of 
ANY size disk to any SMALLER size diskette* (Hard Disk to 
floppies, 8" to 5". etc.) by limply inserting diskettes at 
requested by COPYMULT. No fooling with directory 
deletions, etc. COPYMULT.CMD understands normal "copy* 
syntax and keeps up with files copied by maintaining 
directories for both host and receiving disk system. Also 
includes BACKUP.CMD to download any file "random" type 
file; RESTORE.CMD to restructure copied "random" files for 
copying, or tecopyuig back to the host system; and 
FREEUNK.CMD at a "boom" utility that "relinks" the free 
era ai of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly language Source files included. 
ALL 4 Programs (FLEX, SK'DOS. S m or 5") S99M 

COPYCAT from Lubdata - Postal NOT required. Allows reading 
TSC Mini-FLEX. SK'DOS. SSB 0OS68, and Digital Research 
CP/M Disks while operating wider SK'DOS . FLEXI.O. 
FLEX 2.0, or FLEX 9.0 with 6800 or 6809 Systems. 
COPYCAT will not perform miracle*, but, between the 
program and the manual, you stand a good chance of 
accumplishing a transfer. Also includes some Utilities to 
help out. Programs supplied in Modular Source Code 
(Assembly Language) to help solve unusual problems. 
F, S and CCF 5" - SS0.00 F. S «" - S65.00 



VIRTUAL TERMINAL from S.E Media - Allows one tnrunal 
to do the work of several. The user may start as many as 
eight task on one terminal, under VIRTUAL TERMINAL and 
switch back and forth between task at win. No need to exit 
each one; just jump back and forth. Complete with 
cooOguraliraj program. The best way to keep up with those 
background programs. 

O & COO ■ obj. only - $49.95 

FLEX, SK'DOS DISK UTILITIES from Comparr Systems 
Consultants - Eight (8) different Assembly Language (w/ 
Source Code) FLEX. SK'DOS Utilities for every FLEX, 
SK'DOS Users Toolbox: Copy a File with CRC 6mm; Test 
Disk for eiruri; Compare two Disks; a fast Disk Backup 
Piogram; Edit Disk Sailors; Linearise Free-Chain on the 
Disk; ptint Disk Identification; and Son and Replace the 
Disk Directory (bi sorted order). - PLUS - Ten XBASIC 
Programs including: A BASIC Reaequmzr with EXIRAs 
over "RENUM" like dieck for missing label definitions. 
processes Disk to Disk instead of in Memory, etc Other 
ptograms Compare, Merge, or Gene rata Updates between two 
BASIC Programs, check BASIC Sequence Numbers, compare 
two tmsequcneed files, and 5 Programs for eitablithing a 
Master Directory of several Disks, and sorting, selecting, 
Updating, and printing paginated linings of these files. A 
BASIC Croat-Reference Program, written in Assembly 
Language, which ptovidea an X-Ref Lilting of the Variable* 
and Reserved Words in TSC BASIC. XBASIC. and 
PRECOMPILER BASIC Programs. 

ALL Utilities include Source* (either BASIC or AL. Sourme Cock). 
F, Sand CCF -S5OJ0O 
BASIC Utilities ONLY for UniFLEX - 130M 

COMMUNICATIONS 

CMODEM TelecDmmunicjtiont Program from Compiler 
Systems Conaubanu, Inc. — Menu-Driven; support* Dumb- 
Terminal Mode, Upload and OowriaeJ in ooo-projoco) mode, 
and the CP/M "Moiiem7" Chrislensen protocol mode to 
enable communication capabilities for almost any 
requirement Written in "C. 

FLEX. SK'DOS, CCF. OS-9, UniFLEX, 68000 A 6809 
with Source S100M ■ without Source I50O0 

X.TALK from S.E. Media - X-TALK consists of two disks and a 
special cable, the hookup enables a 6809 SWTPC compiler 
to dump UniFLEX filet directly to the UniFl£X MUSTANG 
020. Tliis it the ONLY currently available method to 
transfer SWTPC 6809 UniFLEX files to a 68000 UniFLEX 
system. Gbnix 6809 uteri may dump a 6809 UniFLEX file 
to a 6809 UniFLEX five inch disk and it is readable by the 
MUSTANG-020. The cable is specially prepared with 
internal connections to match the non-standard SWTPC SO/9 
I/O Dh23 asateaan. A special SWTPC S+ cable set it alto 
available. Users should specify which SWTPC system 
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he/the withe* lo axrenunkalc wilh die MUSTANGO20. The 
X-TALK software ii fumiihed on iwo disk*. One eight inch 
di*k conuunt S.E, Media modem program C-MODEM (6809) 
and I he other diik ii * MUSTANG-020 five inch diik with C- 
MODEM (6M>20> Text tnd binary file* may be di/oaly 
tranifcrrcd between the iwo aynenu. The C-MODEM 
program* ire unaltered end perform a* excellent modem 
programs ako. X-TALK cm be purahaAcd with or wjihaut 
the special cablei. bui thii ■paoal price ii available lo 
icgiaeial MUSTANG-020 men only. 

X-TALK ConpUte (cabU. 2 Jiiii) S99.9S 

X-TALK Software (2 dith only) S69.9S 

X-TALK with C MODEM Sara SU9.9S 
XDATA from S.E Media - A COMMX/WCAilON Package for (he 
UnFLEX Operating System. U«e wuh CP/M. Mam Frame*, 
other UniFLEX Systems, etc Verifiet Trtnsmuiion uiing 
checksum or CXC; Re-Tnumiu bad bWkx, etc 

U ■ S299.99 

GAMES 

RAPIER - 6809 Che** Program fnm S.E Media - Require* 
FLEX. SK'DOS and Ouplayi on Any Type Terminal. 
Feature! : Four level* of play. Swap fide. Poini tearing 
■yuan. Two display bcamta. Change (kill level. Solve 
Qfctkmate problem* in 1-2-3-4 move*. Make move and 
iwap ddca, nay while or black. TWs li one of the 
strongest CHESS pragrants running on any 
microcomputer, estimated USCF Ruling 1600* (Utter 
than mart 'club' players at hither tenth) 
F.SamJCCF ■ S79,9i 

EDITORS & WORD PROCESSING 

JUST from S.E Madia - Text Formatter developed by Rod 
Andenon; for Dot Matrix Printer*, provide* many unique 
feature*. Oapil "Formatted" Text lo ibe Display. Uk (he 
FPRINT.CMD lupplied for producing multiple copies of ihc 
"Formined" Text on ihe Printer INCLUDING IMBEDDED 
PRINTER COMMANDS (veiy useful at other limct alio, and 
wortli the pice of ihc program by iiadf). "User 
Con/igu rable" for aJaptiqg lo ether Priruen (cornea act up 
for Epson MX -80 with Gnhm); up lo lot (10) imbedded 
"Printer Cbnuol Ccmnunda *. Cnroptniaies for a "Double 
Width" primed line. Include! ihe normal line width, margin, 
indent, paragraph, *PW, vertical ikip lines, page length. 
page numbering, centering. Till, junificaUon. etc U»e with 
PAT or any other edaor. 

* Now supnlind at a two diik set 

Disk*]: JVST2.CMD object file. 

JVST2TXT PL9 iarm:FUX, SK'DOS ■ CC 

Diik 92: JVSTSC object ""* tare* in C: 

FLEX, SK'DOS .OS9-CC 



The 7T5C and regular JUST C source are two aepanac programs. 
JTSC compilei lo • veraion that expect* TSC Word 
Processor type command*, (.pp tp xe etc.) Great for your 
older text file*. The C source compiles lo a nandard tyntax 
JUST.CMD object file. Uiing JUST tyntax {fi ,u ,y etc.) 
With all JUST function plui several additional printer 
formatting funaian*. Refcra«rx the JUSTSC C tourer. For 
dtoac wanting an ezcclleni BUDGET PRICED word 
processor, wih featurei none of the other* have. Thii it ill 

Ditk (I) - PL.9 FLEX on/y. F.SA CCF - U99i 
Dak Set (2) - F, S <a CCF <* OS9 (C version) ■ S69SS 

OS-9 6SK0OO campUtt with Source - S79 95 
PAT from S.R Media - A full feature amen opened TEXT 
6DTTOR with all the ben of "PIE™*. For Ihoae who swore 
by and loved only PIE, thii ii for yotil All PIE featurei and 
much morel Too many feature* lo lilt. And if you don't like 
theae. change or add your own. PL-9 toarce furnished. "C 



source available toon. Eaaily configured lo your CRT. with 
■pedal conTtg lection. 

/regular FLEX. SK'DOS SI29S0 

• SPECIAL. tMKOOUCnON OFFER • J70.05 

SPECIAL. PAVJVST COMBO (m/fsource) 
FLEX.SK'DOS S99.9S 

OS-9 6SK VtTtum S229.00 

SPECIAL. PAVJVST COMBO 68K S2490O 
Note: JUST ii, "C" antra avuilaNe for OS9 
CEDRIC from S.E Media - A tcrecn oriental TEXT EDITOR with 
availability of 'MENU' aid. Macro definition*, configurable 
'permanent definable MACROS* - all nandard features and the 
fancat 'global' function* in Ihe wen. A itmple. auuxnaiic 
terminal coefig program makei thii a real 'no hasael' 
product. Only 6K in <iae, leaving Ihe avenge fynem over 
165 tecum for text buffer - appx. 14.000 plui of free 
muy I Extra Tme for prognanrrung at weD a* texL 

r?<gubr S129.95 

SPECIAL. INTRODUCTION OFFER 
FLEX. SK'DOS S69.9i 
BASEDrr from S.E. Media • A TSC BASIC or XBASIC acieen 
editor. Appended lo BASIC or XBASIC, BAS-EDTT i* 
uwuparent lo normal BASIC/XBASIC operauoo, Allowi 
cdiiing while in BASIOX BASIC. Supnoru the following 
fimcuana: OVERLAY. INSERT and DUP LINE Make editing 
BASIC/XBASIC program* SIMPLE) A GREAT lime and 



more retyping 



effort taver. Programmed love ill NO 

enure i line*, etc Complete with over 25 different CRT 

terminal conftgu raucn overlay* . 

FLEX. CCF. SK'DOS RegJarS69 9S 

Umhtd Special Offer: S39.95 
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SCREDrrOR III from Wuidnnh Micro Systems - rVwofil 
Sonm-Orienux) Editor/Word Pronator. Almost SO different 
commands; over 300 page* of ttaumuliii with Tutorial 
Futures Mulli-Column display and editing, "dnjmal align" 
column i (AND add than up automatically), multiple 
keystroke macros, even/odd page headers and footers, 
imbedded printer control codes, all justification!, "help" 
support, (tore CDnunon command leries on disk, etc. Use 
supplied "iet-upt", or remap the keyboard to your needs. 
Eioept (or propoiiicnal printing, thii package will DO IT 
ALU 
6800 or 6809 FLEX, SK'DOS or SSB DOS. 05-9 - 117300 
SPELLS "CompuUT OuxicnarV* (ram S.E. Media - OVER 
150,000 word*) Look up a word from within your Editor 
or Word Procurer (wilA in, SPH.CMD Utility wkick 
optraut if tht FLEX, SK'OOS UCS). Or check and update 
the Ton alter envy. ADO WORDS to the Oicrimary. "Rag" 
questionable words in die Text, "View a word in context" 
before changing or igma-ing, etc SPELLB Tint checks a 
"Common Wold Dictionary", then the normal Dictionary, 
then a "Personal Word Lin*, and finally, any "Special Word 
List" you may have specified. SPELLB also allows the use 
of Small Disk Storage systems. 

F. 5 and CCF - S129.95 
STYLOGRAPH (nan Great Rains Computer Co. A full, 

screen earned WORD PROCESSOR - (uses tbe 51 x 24 
Display Screens on CoCo FLEX/SK'DOS. or PB1 Wordpak) 
Full screen display and editing; support* the Daisy Wheel 
proportional pnruen. 

NEW PUKES 6909 CCF and CCO - S99.95, 

F.Sor - SI79.95. V - 1299 95 
SITLO-SPELL from Great Plans Computer Co. - Fast 
Computer Ouaisnary. Ccsn piemen is Stylograph. 

NEW PUCES 6909 CCF and CCO ■ 16995. 

F.Sor - 199.93. V - 1/49.95 
STYLO-MERGE from Great Plains Computer Co. - Merge 
Mailing List to "Form" Letters. Print multiple Fflet, etc, 
through Stylo. 

NEW PRICES 6809 CCF and CCO ■ $59.95, 

F.SorO - J79.9J, V - SI29.95 
STYLOPAK — Graph ♦ Spell ♦ Merge Package Deallll 

F.SorO - 1329 95. V - SS49.95 

0, 68000 1695 DO 



MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Sytums 
Qauullanta - TABUIA RASA is similar to DESKTOP/PLAN; 
provides use of tabular confutation schema used for 
analysis of business, sales, and economic condition Meno- 
dfiven; extensive report -goseral ion capabiliucs. Requires 
TSCs Extended BASIC 

F.Sand CCF. U ■ 150D0. wt Sourc* - S100O0 



DYNACALC - Ekyeuauc Spread Shea for the 6809 and 
61000. 

F. S. OS9 and SPECIAL CCF - S2O0O0. U - S195O0 
OS-9 68K ■ S595M 

FULL SCREEN INVENTORY/MRP from Computer Systems 
Consultants Use the Full Screen Inventory 

Syilem/Matenala Requirement ("tuning' for maintaining 
invenuxiea, Keeps item field file in dphafaetical order for 
easier inquiry. Locate and/or ptint. records matching partial 
or complete item, description, vendor, or attributes: find 
backorder or below slock levels. Print-outs in item or 
vendor order. MRP capability for the mainurvance and 
analysis of Hierarchical assemblies of items in lite inventory 
file. Requires TSCs Rxccndnd BASIC 

F. S and CCF. V -15000. w/ Sou>t« . S100D0 

FULL SCREEN MAILING LIST from Oraputer Syneroi 
Canjuhanvs ~ The Full Scram Mailing List System provides 
a means of maintaining simple mailing lists. Locate all 
records matching on partial or complete name, dty. state, 
zip. or antibutc* for Listings or Labels, etc Reooiiea TSCs 
Extended BASIC 

F.Sand CCF. V ■ 15000. w/ Source - SIOOD0 

DIET-TRAC Fonxasto from S.E Media - An XBAS1C program) 
thai (dans a diet n terms of euhrr calories and (Sjmtur of 
carbonydrales. protema and fals (C P G%) or grams of 
Csjbuhydnue. Protein and Fat food exchanges of each of the 
six basic food groups (vegetable, bread, meat, skim milk, 
fruit and fat) for a specific individual. Sex. Age. Height, 
Present Weight, Frame Sire, Activity Level and Basal 
Mclabolk Rale for normal individual are taken into y^nin 
Ideal weight and sustaining calories for any weight of the 
above individual are cakuuaed Provides number of days and 
daily calendar after weight goal and calorie plan it 
determined. 

F. S ■ 159.95. U - SS9S5 



AolkMIO I 
■ OJ-f, f • ik'DOSI 
F.PLD, U-lksnxr. 
CO • om» Omanm 0*>* 
cry . onsr < "" f ■ « ■ ns 



1IM k ■ l,.4,™rl at Mkrmn ind Motorok 




South Tast Media 

SSOOCatsw^n Smitfi ti. ■ XtoQcm, Tn. 37343 
Ttiepham: (61S) $42-4600 Tttao S10*neao 



•• Shipping •• 
AM Jn UAA. (ate. m*) 
r-rslfa *ara« k*m 1% 
PWalta Alrmsll AM It* 
Or CO.O. Sklsatni OM/ 



•nSX a»S U»s>T.S|X m Tt»ann.rto at T-rtin>»l "rl-in r^nriiltMil»**.K*PO« Is ■ Tm*>T« tt Hir-K la-jaw Srnnm Cknfc 
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For instance, my friend Denis and I recently wrote a MONOPOLY program for our GIM1X 
6809 machines. How did we go about it? Well, our first step was simply to get the playing-board 
to display on the screen (using the graphics capability of the GIMIX 80x24 Video-Board). Then 
we persuaded it to display two playing-pieces, represented by a Knight and a Pawn, on the GO 
square. Notice, no in-depth study of the entire game program, no "top-down" or "bottom-up", and 
what's even worse, we had GOTOs all over the place. But ... the program worked, and was fairly 
easy to understand. The way we figure it is - - If you can't even get it to display the Game-Board, 
then you're wasting your time planning the rest of the piogram! Next, we got our picture of the 
dice to change spot-patterns on receipt of an 'R' command (for ROLL), and the appropriate piece to 
move correctly to its destination. No buying of properties, or collecting of rents yet. Those were 
the next steps. And so we proceeded, one stage at a time, until our program grew to the point 
where we could actually play a 2-player game, with the computer acting as Banker and verifier of 
valid moves. Some people may claim that this is "top-down" or whatever, but we prefer to think of 
it as "one step at a time" with no particular sequence in mind. Sometimes we might design the 
end-game before the centre portion! 

I should, perhaps, take time out here to explain that Denis and I are not really interested in 
playing the games once we've developed them, though some of our visitors do enjoy our 
Backgammon, Cribbage or other relaxations. No, the fun is in the challenge of seeing if we can 
actually get our computers to do what we want them to do. Once done, we move on the next game, 
or utility, or whatever. Sure beats doing crosswords as an intellectual stimulation, and certainly a 
lot less painful than struggling to the top of Mount Everest only to climb down again once you get 
there. 

THE INNARDS OF XBASIC 

OK, enough of that for now. Let's begin with a brief look at the 'innards' of the workings of 
XBASIC, keeping in mind that any HEX addresses given will obviously vary from one version to 
another, the latest, and possibly final, version for the 6809 being Version 24. 

We'll assume that we've just key*d in the following short program in response to the READY 
prompt : 

5 A-3 
10 B-5 
7 C-9 in the exact order shown . 

A simple LIST command would display the lines in correct numerical order, while an 
examination of the same program saved to disk (using a program such as DISKEDIT) would show 
precisely the same thing. So it would be quite natural to suppose that this is also the way that 
XBASIC actually stores the program in memory during a LOAD or keying-in operation, though 
some people already know that in some way XBASIC structures its lines so that each line carries a 
pointer to the next one in sequence, with the final line's pointer being 0000, to indicate 
end-of-program. Here's what we'd actually see if we performed a dump of the program-memory 
for our little program, the addiesses shown being those of the original FLEX2 XBASIC : 

Address 4B05 06 07 08 09 OA 0B 0C OD 0E OF 10 11 12 13 
Data 00 05 4B 23 7E 80 00 00 69 A4 00 03 01 33 70 

Address 4B14 15 16 17 18 19 1A IB 1C ID IE IP 20 21 22 
Data 00 0A 00 00 7E 80 00 0B 69 A4 00 05 01 35 7D 

Address 4B23 24 25 26 27 28 29 2A 2B 2C 2D 2E 2F 30 31 
Data 00 07 4B 14 7E 80 00 16 69 A4 00 09 01 39 7D 

Address 4B32 33 34 35 36 37 38 39 3A 3B 3C 
Data 80 41 00 00 00 00 00 00 00 00 00 
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Address 4B3D 3E 3F 40 41 42 43 44 45 46 47 
Data 80 42 00 00 00 00 00 00 00 00 00 

Address 4B48 49 4A 4B 4C 4D 4E 4F 50 51 52 
Data 80 43 00 00 00 00 00 00 00 00 00 

Who would have thought that such a simple 3-line program could lead to so much code? And 
what does it all mean? Let's take it a little at a time, just as we do for program development. 

First of all, it's quite obvious that the first 3 lines of code represent our actual program, as we 
veiy readily spot our line-numbers 5, 10 and 7 (converted to HEX) in the first two bytes of each 
line. In no time at all we see that the next two bytes contain the ADDRESS of the next line IN 
NUMERICAL ORDER, not the order in which we keyed them in and not the actual line-number 
itself. Thus they seive as pointers to the precise address at which the next line in sequence is 
stored, except for the last line, whose pointer is 0000. 

So far so good, but what about the 7E' in column S of each of these three lines? This is 
XBASIC's way of knowing that the actual string of data in the program-line is separated from its 
line-number by a single space. If the statement part of the line were indented by more than one 
space, a 7F would be stored heie with an extra byte after it to indicate the number of spaces. So, 
you see, as far as program memory usage is concerned, only one extra byte is needed - no matter 
how deeply you indent your lines beyond one space. The same codes are used to keep track of 
other SPACEs encountered in the program-line, such as 'X = 5' rather than 'X=5'. Not so when 
it's saved to disk, however. 

Column 6 of these lines contains an '80', which tells X BASIC that the line begins with the 
name of a Floating-Point variable (henceforward we'll abbreviate Floating-Point to FP). An '84' 
would signify an integer %-variable (in the range +/- 32767), and an 81 a string {-variable. The 
next 2 bytes indicate the displacement of the Variable itself in the Variable-Stack - composed of the 
3 shorter lines below the program-lines. For instance, the first Variable 'A' has a displacement of 
0000 (ie, it's the first Variable in the Stack), where we see its symbol 80 repeated, followed by its 
'name' in ASCII (that is, A-41). Actually, 2 bytes are reserved here, in case we used a 2-lettered 
Variable-Name, such as AX or JS, with an additional 8 bytes reserved for the current numerical 
value of the variable - initialised to zero. As the program executes during RUN, XBASIC keeps 
the value continually updated. Similarly, the Variable 'B' commences 000B bytes in (that's 1 1 in 
human terms), and 'C is 0016 bytes in (22 to us). Notice that a program-line does not itself 
identify the variable by name; it simply says "Here is a FP, or Integer, or whatever, displaced by so 
many bytes in the Stack - if you want to know more, then go to the Stack for full details!" 

Now back to our program-lines. '69' is XBASIC's "token" for the '=' sign which follows the 
Variable-Name. More on Tokens later, and how you can speed up XBASIC a little by modifying 
its Command-Table and Statement-Table. For now, let's move on to the next byte, an 'A4'. Does 
this mean that all our variables are equal to A4? Not at all! This is simply a code to indicate that 
each is equal to a CONSTANT in the range +/- 32767 (whose value follows) and not to another 
Variable - as in the statement A=X, for example. The value (in HEX) appears in columns 1 1 and 
12, and again in ASCII in columns 13 and 14, the 01 indicating 'one digit', followed by 33 for 
Line 5, 35 for line 10 and 39 for Line 7. These, of course, arc the ASCII values for 3, 5 and 9 
respectively. Finally, each line ends in a 7D', which is XBASIC's token for a 
CARRIAGE-RETURN. 

The assignment-codes for Variables depend on the bit-values in a single-byte code. For those 
interested in the details, here is a table showing the meanings attached to the individual bits, as far 
as I've managed to decipher them to date : 
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Bit 7 A variable of some kind, as distinct from a Command or Statement 

(whose Tokens all lie in the range 00 - 7F). 

Bit 6 A pre-defined variable (such as FN) 

Bit 5 A Constant 

Bit 4 Subscripted 

Bit 3 Not deciphered yet 

Bit 2 % integer in the range +A32767 

Bit 1 Line-Number 

Bit $ string 

Thus the code for a Line-Number such as the '1000' in "GOTO 1000" would be A2. 
Converting A2 to binary gives 1010 0010, and thence (reading the T bits from left to light) we get 
(i) Variable (ii) modified to Constant and (iii) Line-Number. It may seem strange to have a 
Variable-Constant, but the word 'Variable' is used solely to distinguish the code from a Command 
or Statement code (token). 

I would be more than pleased to hear from anyone who has managed to take the above 
deciphering a stage further, or who can confirm Bits 6 and 4. 

At this point, 1 would suggest that you experiment a little yourself by first of all setting your 
free memory to an all-zero state, then loading XBASIC and writing a short one- or two-line 
program. Good examples are A=X, or A%(1)=19, or better still A%(5,11)=15. The 
Memory-Examine function of your 'BUG' (be it GMXBUG or SWTBUG) should readily enable 
you to locate XBASIC's program-buffer area where your program has been stored. After this, it 
will only be necessary to clear this particular area before writing another test program. Cleaning-up 
is to be highly recommended, otherwise you'll end up being confused by garbage left over from a 
previous trial. 

TOKEN HASHING & TABLES 

Instructions to XBASIC are given either by means of COMMANDS or STATEMENTS. 
Commands are those instructions which will execute only when the READY prompt is being 
displayed, such as LIST, RUN, SAVE or LOAD, but will not execute if they appear in a 
program-line. Statements, such as PRINT, INPUT, FOR or NEXT, on the other hand, are 
capable of executing directly OR as pan of a program-line. Be that as it may, one of the first things 
that XBASIC does when you hit C/R is to "parse" the line - that is, it examines it for coirect 
structure, or syntax - and will not accept the line if it contains a major error, such as a missing 
quote or a missing parenthesis. At the same time it converts instructions to "tokens" in a 
Work-Buffer distinct from the actual Input-Buffer, and classifies and codes the different types of 
Variables, as we saw previously. 

In Immediate-Mode, the parsed line will then be immediately executed, but in Program- Mode it 
will be transferred from the Work=buffer to the Source-Buffer, and integrated into the complete 
program by adjustment of the linkage-pointers at the start of the appropriate lines. 

A token is nothing more than a code-number for each instruction. We've already come across 
the example of '69' being the token for '='. Others are GOTO 01, GOSUB 02, RESUME 03, and 
so on. And what advantage does tokenising serve?, you ask. The main benefit is speed of 
execution of your program. Without tokens, let's assume that XBASIC meets the woid PRINT in 
a program-line. In such a case it would have to scan an entire Statement-Table until it identified the 
word PRINT, at which point would be stored the address of the subroutine which actually tells 
XBASIC how to correctly interpret and execute this instruction. With tokens, however, all 
occurrences of the word PRINT have been replaced by its token 07 during the parsing stage, so 
now, when XBASIC comes across 07, it "knows" that the 7th location in a Statement Vector-Table 
contains the address of the PRINT subroutine, and BINGO, it can go straight to work without 
having to carry out an exhaustive table-search each and every time. 
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We have already seen that it does a similar thing with all its variables, by stacking them in a 
table, and maintaining pointers to their locations in that table. This is why XBASIC is like a 
speeding bullet compared to some other BASlCs. 

On the other hand, XBASIC goes to some lengths to hide its innermost secrets from prying 
eyes by encrypting or encoding the key words PRINT, INPUT, etc into a coded form, so that an 
examination of the machine-language coding of XBASIC will not readily show where the 
Command-Table and Statement-Table are located. Thus the ASCII codes for the individual letters 
of the word SAVE' (53,41,56,45) are first 'encoded' into the codes 8C,68,92,70, and then the 
command-table is scanned for the encoded code-sequence in order to identify its corresponding 
token. In addition, of course, the reverse process has to occur when, for example, a line is LISTed 
to the screen. First, the table is scanned for the token, from which XBASIC is able to find the 
corresponding secret-code sequence and decode it into its human-readable foim before finally 
shooting it out to the screen. For those who are interested, the encoding procedure involves 
doubling the ASCII code for a particular letter and subtracting $1 A from the result. Thus 'E' 
(ASCII 45) becomes 8A by doubling, and 70 by subtracting 1A. 

Obviously then, if we went through these tables and re-wrote the Commands and Statements in 
normal ASCII we could save XBASIC the time and trouble of encoding and decoding these 
encoded forms. In addition, it goes without saying, we would also have to NOP out the encoding 
and decoding routines. To NOP something out means to replace it with NOP (No-operation) 
codes, 01 for 6800 machines, or 1 2 for 6809 computers. 

MODIFYING XBASIC 

Let's try that! Now that we know that SAVE encodes into the code-sequence 8C,68,92,70, 
let's scan memory for that sequence. Having found it (it's at location 0682 in one version of 
FLEX2 XBASIC), we proceed through the Command-Table, decoding as we go, until we come to 
command SCALE, whose token is 0E, which ends the table. Along the way we were somewhat 
surprised to encounter the command T[ A ]@ with token '0D'. Strange, there's no mention of it in 
the XBASIC article. To satisfy your curiosity as to its function you should enter it in response to 
the READY prompt. How about doing it right now? 

The best way to decode the tables is to initially prepare a decoding table composed of the 26 
letters of the alphabet and their corresponding encryption-codes and matching ASCII codes. This 
will easily allow you to identify the various instructions as you come across them in the Tables, and 
to convert them to straight ASCII. 

The next step is to locate and decode the Statement-Table in the same manner. Note that you 
cannot stop part way through - both tables. Command and Statement, must be done at the same 
time! The fust Statement (token 01) is GOTO, which encodes into the sequence 74,84,8E,84, and 
which is located at address 0FF3 in the old FLEX2 version. Here you will decode all the way 
through the Statement- Table, which runs straight into the Function-Table (commencing with FN - 
token 34), and on into the Operator-Table which encodes the three logical-operators NOT, AND 
and OR, ending at token 60. Beyond this point will be found several other symbols, such as <. >, 
=, (, ?, etc., which TSC didn't bother to encode. Note, by the way, that the token for '?' is the 
same as that for PRINT, which explains why XBASIC accepts an entry of '?' as being equivalent 
to an entry of 'PRINT. 

Finally, we must locate and NOP out the encoding and decoding sections in order to neutralise 
their effects. The encoding section can be identified by the code : 

48 ASLA Multiply by 2 
80 1A SUBA #$1 A Subtract $1 A 
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and the decoding section by its inverse : 

8B 1A ADDA#$lAAdd$lA 
44 LSRA Divide by 2 

Replacing these 6 bytes with the appropriate NOP code will complete the whole operation. 

I should point out here that XBASIC will not actually EXECUTE a program any faster as a 
result of the above conversion, as all statement-lines will have been tokenised by RUN time. Only 
operations involving convening lines to a tokenised form (or conversely de-tokenising them back to 
their original form) will be speeded-up. This includes operations such as LIST, LOAD or SAVE. 

A SUGGESTION 

I like to standardize commands in the various programs in my library. That is to say that if 1 
wish to exit to my MONITOR program, I don't want to be left wondering whether I should enter 
MON, or maybe EXIT, or should it be QUIT or even PATCH? So, while I was about this 
remodelling business in my own system, I decided to standardise on the command 'MON' to return 
to MONITOR. Makes sense, and in this connection I would like to suggest to program-wiiters that 
they develop a set of standard commands, such as MON to exit to MONITOR, FLEX to exit to 
FLEX, and so on. Of course, by changing XBASIC's 'EXIT to 'MON' well have a byte left 
over, which we'll bubble-down to the bottom of the table during our conversion, and leave it there 
as an extra NUL (code 00). Don't forget, too, to go through your XBASIC article and change all 
references to 'EXIT to 'MON', should you also decide to go this route. 

DISPLAYING XBASIC ERROR MESSAGES 

A modification to 6809 XBASIC appeared in a long-ago issue of 68 Micro Journal, which I 
think bears repeating here, if only for the benefit of newcomers to this excellent magazine. This 
mod gets lid of those aggravating "ERROR #73 AT LINE XXXX" type of error-messages, and 
replaces them with the much more readable "ILLEGAL EXPRESSION AT LINE XXXX". In 
order for this to work, though, you'll need the expanded ERRORS.SYS on Service Disk #19, or 
key it all in yourself. First of all, for 6800 owners, you should locate the following code 
somewhere near address S0BC3, while 6809 users will go to the approximate address $0B77, and 
make the specified changes : 



6600 


USERS 






6B09 USERS 






Present 


Change to 


Present 




Present 




Change to 


XBASIC 




BASIC 




XBASIC 






CE 0C0F 


31 AC20 


30 BD 00 


XX 


30 BD 00 


XX 


B7 CC 20 


BD 0SB4 


8C AC1F 


17 F9 xx 




17 F9 xx 




BE CC IF 


CE 0122 


BD AD3F 


30 CB xx 




30 CB xx 




BD CD 3F 


SF 


5F 


SF 




17 XX XX 




BD CD 24 


F7 0126 


FT 0126 


17 XX XX 








12 (12) 


BD 0FC6 


BD AD2 4 


where 


xx Is some 


code 





The extra 12 (NOP) will be necessary only for BASIC, not for XBASIC. 

A PROGRAMMING TIP 

I think every reader knows that PRINT Statements can be chained thus : 

50 PRINT "Your name is ";N$;" and your age is";A%; etc 

but how many, I wonder, know that INPUT Statements can also be chained, and even have a 
final text-string displayed? Thus : 
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50 INPUT "What is your name ",N$; "Your age ",A%; 'Thank you!" 
This is equivalent to the following : 

50 INPUT "What is your name ",N$ 

51 INPUT "Your age ",A% 

52 PRINT "Thank you!" 

I'd never seen this mentioned anywhere (other than in a BASIC-PLUS article by Digital 
Equipment Corporation), so out of curiosity decided to try it with XBASIC, and was quite pleased 
to find that it worked. Actually, after making due allowance for references to mag-tapes or 
paper-tape, the DEC article could almost have been written for XBASIC users. 

XBASIC'S "STOP", "RND" & "LIST" 

XBASIC's Instruction-Manual doesn't describe these three instructions correctly. For 
instance, when a program encounters the STOP instruction, and is then restarted with the CONT 
command, it resumes operation AT THE LINE FOLLOWING THE 'STOP', and NOT at the 
Statement following the 'STOP' on the same line (if one exists). If any Statements DO follow the 
'STOP', they are thus ignored, so, if you are using STOP as a debugging tool, this should be kept 
in mind! Depending on the nature of the bug, it may sometimes be advantageous to insert a STOP 
inside a program line, and at other times at the end of a line. Usually an extra debugging line is 
inserted at an appropriate point in the program, such as : 

51 PRINT 1%, J$: STOP 

which will cause the current values of the named variables to be displayed, followed by the 
STOP message. At this point the value of any variable may be changed, and the program will still 
CONTinue. But not if the piogram itself is changed in any way, let's say by adding or deleting a 
line. 

RND(X) generates a number in the range through 0.999999 and NOT through 1 as 

stated, so the formula given is valid only for the generation of FRACTIONAL numbeis in the range 
MS up to, BUT NOT INCLUDING, ML. If you wish to generate random INTEGERS over a 
desired range, the formula should be amended to read : 

X = INT((ML - MS 3+ 3 1 ) * RND(O) +MS) 

otherwise it will not generate ML itself. 

In addition, the description of LIST is incomplete in that it informs us only that LIST may be 
terminated with a A C (BREAK), with no mention of the more normal use of ESC to halt or re-start 
the LISTing, and C/R to abort it while in the halted state. 

While on the subject of random-numbers, I've always found it a good idea to incorporate a 
known random-seed in the RND-generator, by inserting something like the following near the start 
of any XBASIC program (particularly a Game) which uses RND(X) : 

50 INPUT "Please enter a number between and 99999 (0 allows the 
computer to choose) ",X : X=RND(-X) 

This technique is invaluable if the program has a bug, as it is possible to keep repeating the 
self-same game-sequence (unless, of course, a response of was made). It can also be used in the 
event of a really hard-fought game, where you just MARGINALLY lost to the computer, and 
would like to try it all over again using slightly different tactics, to see what the new outcome 
would be like. Decimal numbers are equally acceptable as a response, eg 123.456, 
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ANOTHER PROGRAMMING TIP 

Talking about Games .... as you well know, lots of games include rules or instructions for 
play, and usually ask the Player whether he needs those instructions. They take up a lot of room in 
memory, and if they occur in the wrong place in a program they help to slow down its execution. 
Besides which, after a while you don't really need them any more, and yet you don't want to throw 
them out in case a new Player comes along who's not familiar with the lules of play. 

In such a case, it's a good idea to remove all these instructions by judicious use of the SPLIT 
utility. After splitting them off, the EDITOR, or other word-procssing tool, can be used to remove 
all items specific to XBASIC, such as Line-Numbers, PRINT statements, etc., leaving only the 
text which was originally enclosed in quotes. The quotes themselves should be deleted, and the file 
finally icnamed to <game.DOC> or <game.INF>. Then, in the actual game itself, a sequence such 
as the following can be inserted near the start : 

50 INPUT "Do you want instructions (Y or N) ",Q$ 

60 IF Q$="Y" OR Q$="y" THEN EXEC/TTYSET PS=Y: LIST game.DOC: TTYSET 
PS=N" 

70 rest of program 

A response of 'Y' then causes the program to turn on the PAUSE feature so the LISTing 
doesn't scroll madly off the screen, but waits for the reader to scan the page before hitting ESC to 
scroll to the next. Finally PAUSE is turned off, and the program picks up at Line 70. Any 
lesponse, other than "Y" or "y" bypasses this sequence and proceeds straight to Line 70. 

COMPILING SOURCE FILES DIRECTLY FROM XBASIC 

If you really want to speed up your XBASIC programs, however, you should make more use 
of its COMPILE command, by first saving your program in the regular manner and then executing 
COMPILE "file-name". The reason you need a regularly SAVEd version as well is that a 
COMPILED program cannot be edited directly. All you can do is to RUN it. It makes for a much 
more compact file on disk, takes up a lot less room in memory, and also loads much faster! It will 
have the extension .BAC (for BAsic Compiled), and can be fired up from FLEX with the 
command "XBASIC file-name', or from XBASIC itself with the command RUN "file-name". In 
both cases the program LOADs and RUNs automatically. 

Transfening instructions to a .DOC or .INF file, and/or COMPILing, will very often allow 
you to run those REALLY large programs which won't quite fit into memory otherwise, and is 
preferable to snipping out those essential REMs from your programs. 

But have you ever tried to LIST a .BAC file which XBASIC has in memory? It will snap right 
back with the message "SOURCE NOT PRESENT", which we know isn't true, because it's 
perfectly capable of executing the program in response to RUN. Would you like to be able to LIST 
it? 

Here's how! First load XBASIC, then execute MON (or EXIT if you chose not to 
standardise). Now, somewhere in the vicinity of address S099B for 6800 owners, look for code 
7D 01 1C 27 05 86 40. The important byte is the 7D, which should be changed to 39. 6809 useis 
will look in the vicinity of address $0900 for the code sequence 6D C8 57 27 xx 86 40, and 
similarly change the 6D to 39. Then execute a jump to XBASIC's Warm-Stan with GMXBUG's J 
3, or its equivalent in your Monitor. Now LOAD your .BAC program with 'RUN "file-name"', 
and wait for it to halt with a request for operator- INPUT. When this occurs hit BREAK (*C) to 
interrupt the program, or if you're really impatient hit BREAK as soon as your program is LOADed 
and actually RUNning, and then LIST. Did you ever see such a compact program format? Makes 
you wonder how the program could possibly RUN with so much essential information apparently 
missing! No wonder it takes up so much less room in memory, or on disk. Now you see why 
you can t change it if it has a bug in it. You must identify the buggy line, go back to your 
originally saved .BAS file, debug this version, SAVE it once more, and finally COMPILE a new 
BAC file. 

To Be Continued Next Month 
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A coaplctc block diagram of thl» general 
purpose HCU Is Illustrated In figure 1. 
Being implemented In HCHOS technology gives 
this device the advsntages of operating 
at high speed while consisting very low power. 
Noise immunity Is also s key reason for 
using HCHOS In this snd suiny other new In- 
tegrated circuits. 

Seversl discrete functions have been 
pulled on-chip to lower both systesi chip 
count and the overall coat. Features such 
as the on-chip EEPROH (4160 bytes), bootstrap 
ROM (240 bytes) and Static RAH (176 bytes), 
and the 24 bidirectional I/O llnee are Included 
on the chip. The I/O lines are grouped 
to forn three 8-blt psrrsllel ports A, I, 
and C. The fourth port, D. Is a 7-bit fixed 
Input port used to operate and tsonltor the 
aerial systems. The sophisticated 16-bit 
timer systesi adda to the overall flexibility 
of the HCU. The timer la Ideal for accurately 
tracking events within the system making 

An alternative to the traditional parallel 
bua architecture la the aerial network link 
uaed to distribute proceaalng. In ao doing, 
much of the buffering snd control logic 
of a standard systesi Is slgnlf lesnt ly reduced 
snd In some caaea eliminated. Many of todays 
single-chip microcomputers (HCUs) are enhancing 
ayatem performance by supporting s variety 
of aerial atandarda. One such HCU produced 
by Motorola la the HC68HC0SC4. 

This la an 8-blt device that offers 
two distinct aerial protocolai they are 
the Serial Peripheral Interface (SPI) and 
the Serial Cooounitji loni Interface (SCI). 
Each type supports specific application 
areas. The SPI standard la uaed for local 
data tranafera usually on s single printed 
circuit board. The SCI on the other hsnd, 
can support coonunlcst ions between greater 
dlstancea. Thla could Include transfers 
between different bosrds within a system 
or from data moves between box systems. 




surs that operations hsppen st the correct 
time. The CPU portion contslns a control 
aectlon, an ALU, and a microproceeaor . 

The serlsl ports of figure 1 sre pert 
of port D. Included sre the control lines 
sssoclated with the sctusl dsts transfer 
process. A serlsl system can be designed 
with minimal lnterfsclng hardware by ualng 
port 0. 

Linking Multiple MCOa Oaing SPI 

The SPI la a well defined stsndard 
that haa evolved as the result of pin- Umltat ions 
on sosm early HCUs. ly using the SPI lnterfsce 
scheme, multiple HCUs have a. cooaunlcst ions 
link allowing them to transfer dsts to and 
from each other aa well as between other 
external peripheral devlcea on a printed 
circuit board (PCS). There are four primary 
algnal lines aaaoclated with Unking HCUa 
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with the aerial atandarda . These are the 
data in, data out, clock, and alave aelect. 
The possible configurations supporting this 
method are a three wire ayaten conalatlng 
of one sitter HCU and a four wire hookup 
which haa both multiple masters and alave 
HCU.. 

In figures 2a and 2b, two possible 
conf lgurst Ion schemes are shown ualng multiple 
HCU devlcea. The flrat Illustration, figure 
2a, has the single aaater Implements! Ion 
with four alave HCUs . In figure 2b, the 
required arrangement for a four maater and 
two slsve system Is displayed. 

The slsve select Is sn sctlve low Input 
to the HCU. It Is used sa the control to 
the device Indicating either maater or slsve 
ststus. A low shows s slave status while 
a high lndlcatca mastership of the HCU. 
The slsve select line of the maater HCU 
In figure 2a la pulled to V DD, therefore. 
It la held at a conatant high level. The 
I/O port (port D) la used to choose one 
slsve of four to allow data transfer to 
only one slsve device st s time. This la 
performed under softwsre control. 

In figure 2b, the port D lines choose 
the spproprlste alave to tranafer data to 
or from a master device. Only one of the 
three aaatera can control the communicst ion 
chsnnel st s time. Applications where this 
type of Interconnect would be spproprlste 
Include numeric cslculstlng systems not 
hsvlng s lot of time for processing dsts 
but where the result Is needed quickly. 



Write snd Seed Cycles 

To lllustsrte how the master snd slsve 
HCUs trsnsfer dsts, refer to figure 3. 
With the slsve select of the master high 
or st S volts snd the slsve HCU's slsve 
select low st volts, the trsnsfer tskca 
piece. The SP1 clock gencrstor produces 
s stresm of pulses. 

During s write cycle, the lntemsl 
bus does s psrsllel losd of the master's 
B-blt shift register. This dsts byte Is 
then shifted out serlslly to the slsve HCU 
vis the master out/alavc In (HOSI) pin. 
Following the aerial tranafer of the data 
to the alave, the read buffers ere losded 
with the dsts. Flnslly, the Internet bus 
receives the orlglnsl dsts. The old dsts 
thst wss In the slsve device Is slnul tsneouely 
shifted out to the master over the maater 
ln/slsve out (HISO) pin. 



A resd cycle 
fsshion to thst of 
the esse of s resd 
recleves dsts serl 
from the slsve by 
After the register 
the resd buffers r 
format. The dsts 
use by the Interns 
hsrdwsre working t 
conf lgurst Ions snd 
Extemsl lnterfscl 
sre minimal while 
efficient Instruct 



operstes In s slmllsr 

the write cycle. In 

cycle, the maater HCU 
ally Into the ahlft reglater 
way of the HISO pin. 

la completely loaded, 
ecelve the data in a parallel 
la then svsllsble for 
1 bus. The softwsre snd 
ogether make the maater/slsvc 

dsts trsnsfers possible, 
ng hsrdwsre requirements 
the HCU offers s very 
Ion set. 



An lmportsnt consideration for successful 
serlsl communicst Ion Is to make provisions 
for s vsrlcty of Interrupts. This sllowa 
efficient use of the HCU ports snd serlsl 
bus. There sre five types of Interrupts 
svsllsble on the HC68HC05C4 HCU. They sre 
the IRQ, SFI, SCI, Timer, snd the non-msaksblc 
softwsre interrupt (SWI). To execute s 
softwsre routine from the on-chip memory, 
bsslc checks sre made to Insure proper operstlon. 
After reset, either from power on or CKtemslly, 
the Interrupt ststus la continuslly being 
wstched. Figure 4 Is s flowchsrt showing 
the steps required for progrsm Instruction 
execution snd the Interrupt monitoring sequence. 

As long as the (I) bit in the condition 
code register la act, new program instructions 
are fetched and executed. When thla bit 
Is not set, s poll routine Is executed to 
determine which type of Interrupt Is requesting 
service. Once the service request hss been 
satisfied, the lntcrnsl ststc of the machine 
la returned to its orlglnsl vslues prior 
to the interrupt. Progrsm execution will 
continue from this point. 

Internal Registers 

The Serlsl Pcrlpersl Control Register 
(SPCR) contslns seversl bits thst control 
the operstlon of the serlsl bus. There 
Is sn interrupt bit, sn output ensble bit, 
s master bit, clock polsrlty snd phssc bite, 
snd two clock rste bits. 

A second register, the serlsl pcrlphcrsl 
ststus register (SPSR), hss s flsg bit for 
dsts trsnsferrlng, s mode fsult flsg, snd 
s write collision ststus bit used to notify 
the user thst during s dsts trsnsfer, an 
attempt to write to the dsts register wss 
made. If s collision Is detected, the orlglnsl 
trsnsfer is not interrupted snd the write 
stteapt to the dsts register is unsuccessful. 

Linking Periphersl Devices 

Numerous spplicstlon sress csn be supported 
using the SP1 stsndard ss the link. Off 
the shell logic, memory, snd other periphersl 
devices sre ldesl for the sbovc MCU configurations. 
Included in thlc group would be EEPRONs , 
RAHs , LED drivers, A/D converters, frequency 
synthesizers, snd I/O cxpsnslon devices. 
Further simplifying the design, most of 
these devices require only sn Input for 
dsts plus s clock. Their one direction 
dsts flow chsrscterlstlc slso helps with 
the tssk of lnterfsclng. 

By using the serlsl spprosch, many 
system control functions csn be performed 
by these Intelligent controllers, the HCUs. 
The requirement for sccurscy plus the need 
for high dsts trsnsferrlng Is maintained 
by using the serlsl bus communicst Ions link. 

One possibility would provide communicst Ion 
between HCUs snd periphersl devices thst 
sre on s single bosrd computer (SBC). By 
reducing psrsllel bussing on s SEC, much 
vslusble bosrd spsce csn be ssved. Ststus 
of externsl functions csn csslly be monitored. 
Dsts scqulsltlon systems thst convert snslog 
dsts to dlgltsl slgnsls lnterfsclng with 
the HCUs on the SBC csn control such snslog 
functions ss tempers ture , pressure, or speed. 
Trsncducers would be used ss psrt of the 
dsts scqulsltlon system. 
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Figure 1 

A block dtagraa of Che HC6BHC0SC4 it 
shown, let multiple I/O and serisl 
porta enhance tta capability of being 
designed into many application areaa. 
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The baaic HCU ayatea which tranafera 
data aerially haa many advantagea. Por 
local commtunicat iona , auch aa between NCLTa 
or peripheral devices on a alngle PCS, the 
SP1 is ideal for reducing hardware inter- 
facing interconnects and parallel buaea . 
The HC68KC05C4'a aerial stsndsrds are of 
a general nature ■ simplifying the baalc 
design while reducing overall system coat. 
This allowa then to be dealgned Into ayatena 
with little effort . 

Progrssmting thaaa devlcea la similar 
to programing a atandard H146805 family 
member. It has 62 Inat uctlona In lta In- 
struction aat. There are four different 
typca of inatructlona. Theae are the 
reglater/memory , read-modi fy-wrlta . branch, 
bit manipulation, and control. 

By combining all of these feeturea 
added to the device flexibility, the HC68HC0SC4 
la the perfect aoluclon to many application 
araaa. It la eaay to dealgn-ln, program 
and offera high reliability for the end 
ayatea. 
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figure 2b 



A single maater with aultlple alave HCUa 
la being illustrated. Thla la only one 
of aeveral poaaible configurat iona. 



Multiple aaatera can be aupported uaing 
the NC68HC05C4 MCI). 
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Figure 3 

Serial data la shifted through registers 
by the SPt clock generator. Data la 
made available In a parallel fashion 
for the use of the internal bua. 




Figure 4 

A flowchart of the Interrupt process 

is shown above. Both hardware and softvare 

Interrupts are checked during program 

execution. 
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computer 

The new ST-2900 ayslam — a complele B4K small business or hobbyist computer 
Is only one ol lis many posilble configurations Among Us leaturas artk 

• Small enough lo hold In your handl (Eurocard sUe 39"x6 3") 

• Three board "system** tor g*eelrjf vtysallhty lhan single board computers 

• CPU Bowd - powerlul B609E processor, 16K o> 64K RAM, 1K3ZK EPflOM. 
2 RS23? serial ports with software programmable baud rales, IS bit courv 
ler/ilmei Hun |he CPU board all by ils-sll or plt/g your own custom board or our 
FDC boatxi andfor HAM -512 board Into irve expansion coined or. 

• FOC aoasd - Ooubl^-sideoVdoubtB-densitv' lloppy disk controller with adlu&t 
mflnl tree digital data seperetor and wnta precompansatron, 2 B bil oareiial 
pots- 2 18-bit counter/timers, prototyping ares 

• RAM-612 Board - 524.28© bytes ol HAM on a 4 1 5" x 6.3" board » Low power 
Includes HAM-Oisk sollware tot FLEX/STAHDOS or OS-9 

• FLCX. ITAR-OOl, and 0»-» supporled - sohwero ■oloctebto. 

a 059 Conversion Package ir>|a you use Ihe low coal Radio Shack CoCo virslon 
of 0S-9 on our ST-2900 system Save $131 ofl the suggested list price of OS 9i 
No pro«remmtn« li involved. Supports CoCo 0S-9, slsndord OS9 and 
MlZAR OS-Q/eflK disk lormsts Compatible wklh PC-XFER to let you 
reetsrwrltefforvnot MS. 008 dlakal 

• CPUbsreboardplusEPROM S45 OS-9Con-/er*jjon Package $49 
FOC bare board $38 FLEX Conversion Package 129 
HAM 512 board AST [wfo RAM] »2»9 CPU ♦ FOC ♦ OS-9Conveision $119 
CPU *■ FOC board eel assembled and leaied J329 

• Add $5 shipplng;handling (SiO overseas). These prices are in US funds 
Canadian orders call or wrrte lor prices Terms check, money order. VISA 

||r*cMmiik. FLEX - Tvcnn«c*i B"*ii»*WCa'n«*>fc*rri . OS-S - Mn row* w & lAlliarOI WSOOS)- MkicvmH 
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DAISY WHEEL PRINTERS 
Qume Sprim 9 - $900 Quine Sprint 5 - $800 
HARD DISK 10 Megabyte Drive - Seagate 
Model #412 $275. 

3 - Dual 8" drive enclosure wiih power supply, New 
in box. $125 each. 

5 • Siemens 8" Disk Drive , $100 each. 
Tano Outpost H, 56K, 2 5" DSDD Drives. FLEX, 
MUMPS. $495. 

TELETYPE Model 43 PRINTER - with serial 
(RS232) interface and full ASCII keyboard. $250 
ready to run. 

SWTPC S/09 with Motorola 128K RAM. 1-MPS2, 
1-Paralell Port, MP-09CPU Card - $900 complele. 
(615) 842-4600 M-F 9AM to 5PM EST 
%•% 

Wanted to buy. SWTP MP09 CUP CARD. SS50C 
64K or 256K memory. Details to Roben Sieedman. 
RMB 9010 
Omeo Highway SarsfieWJ 

3883. Australlia 

• •• 

Wanted Percom LFD400 floppy disk controller 
card.Coniacl: lack Bowodin (219) 262-2126 
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J\opc we havn't gotten into burlesque or movie 

reviews. Not yet, anyway. What we have here is a review of 
a new and somewhat novel accessory for the Mascintosh - 
the Cauzin Softslrip System. 

Now. many of you oldtimers wil remember a similar 
system promoted by Byte magazine, some years back. 
Although not the same, both the Cauzin System and the 
Byte effort were of the same family - reading of printed 
strips from paper. The Byte system read bar code type 
strips. Not too efficient, even compared to the Cauzin 
system. Also, the Byte system left it up to the reader-user 
to solve the hardware end. Eventually, it was probably the 
hardware (or lack of same) that caused that effort to slowly 
fade away. Byte, because of their size and clout could have 
made it go, but the hardware availability thing was never 
resolved. With the Cauzin System it is. 

There are other significant differences between these 
two. First, the Cauzin system is far more efficient in 
storing data to a piece of paper. An 8. 5 by 11 sheet of paper 
(about the size of the average magazine page) could hold 
about one or two Kbytes of data, bar-code style. Slightly 
more, accenting how tightly the bar-code strips woe "pasted' 
to the page. Barcode microcomputer data use never really 
got far off the ground. And there is now few who remember 
that effort. So, we will not dwell there any longer. 

The Cauzin System is a better thought out system of 
snip storage. The data printed by the Cauzin System is in a 
format known as dibits. Each zero (binary) dibit is two 
success' ve squares with a black followed by a white. A one 
is a white followed by a black. So, each byte of data is 
composed of 16 black and white squares in a row. 

The Cauzin System is composed of two major items, 
the reader and it's software. Available now for both the Mac 
and IBM crowd. The rest will have to do without until 



some enterprising hacker decides to implement the strip 
software for other systems, or Cauzin gets around to it. 

The storage capacity of the Cauzin System is far more 
efficient than ihe bar- code way. Using a dot matrix printer • 
for the Mac, the Image Write, density can be about 700-800 
bytes per 9 inch strip. According to how tightly they are 
'pasted' to the page that will yield about 3 to 4 Kbytes of 
data per page. The LaserWriter produced strips are able to 
lay-down about 3 to 4 Kbytes per strip, or about a full page 
of ImageWriter strips per page. Also, Cauzin offers to 
publications using their strips a rate for high density 
negatives (you send the data to ihem, they send the 
negatives back, for a small fee); this density packs about S 
to 6 Kbytes per page. 

The Reader 

Ihe reader is a device that is placed over the strip to be 
read. It has an internal track and a small motor that diags an 
optical reader over the strip. Ihe time to read an average 9.5 
inch strip is about 30 seconds. In that period of time it has 
read each line several times (to insure accuracy) and 
downloaded the data to the Mac in 4800 baud burst. We 
read thousands of bytes and several dozen strips witout 
enor. It is sturdily construe ted and very reasonably priced at 
$195.00, with reading software. 

If you desire to make your own strips then you will 
have to purchase the STRIPWARE™ Stripper™, for a bite 
of about $19.95. Although not a very heavy price, but due 
to the essential part it plays in the entire scheme, and that 
Cauzin certainly must be doing what they can to insure the 
spread (and survival) of Cauzin technology, I would have 
thought that it would have been a part of the original 
package. Everybody should be making and 
distributing strips! 
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Anoiher surprising aspect relating to the above is the 
reproduction for distribution of strip software you might 
develop. You must pay Cauzin a fee for each one sold 
commercially.' Personally I feel that that is a real hummer. 
Seems ihere just may be too many barbs on the wire that 
separates success from failure. Especially when you 
consider the fate of bar-code data schemes and the fickle 
nature of the Mac market. I called Cauzin about this some 
weeks prior to this writing. They indicated that was under 
review, and someone wiih better information, on this 
subject, would get back to me the following Monday. They 
never called. So, I only know what the book says! 

As of this date I find little snip software advertised in 
any of the Mac directed magazines (first week of October). 
Fact is, the most we have seen, arc in Cauzins ads. And 
even there, in addition to several small programs, you find 
that many (most) of the strips are advertising hype, 
instructions for other software that most users do not have, 
or some other useless data. Most users I discussed this with 
expressed the feeling that they get more indepth reviews 
and adveitising in the magazines. They would like to read 
more useful stuff with their readers. No one wants to shell 
out about 200 bucks to read hype about things they don't 
have! 

Software - good software - is going to be the heart and 
lungs that keeps this technology going. Software 
restrictions will certainly not help. Unless more and better 
software appears in strip form, at a reasonable price, I fear 
that this will be but another passing fad. 

Also, several of the larger software vendors made 
remarks to the effect that because of the low price of bulk 
diskettes (also no fees paid for anything on the disk, to the 
disk manufacturer) and that the storage density of diskettes 
is so much higher, diskettes seem the natuial basis for 
media distribution. All Mac & IBM users have disk drives. 

Also during discussions of this type of media with 
several software vendors, all, I repeal all, told me that they 
are not willing to make a commitment to this until they 

see some movement towards stability. That movement will 
come from magazine readers and users. Until then a big ? 
hangs over this new segment of data collection, storage and 
distribution. 

The following have indicated, to some degree or 
anoiher, that they will use this strip system somewhere 
within their operation. Bar Code News. Byte. Data Based 
Advisor. Keyboards. Computer A software. Library High 
Tech News. MacUser. McGraw-Hill. Nibble. NibbleMac, 
PC World. Pergamon Press. Computing. Village Voice and 
several Users Groups. 

For our Mac readers, we would be interested in running 
strips in our Mac columns, if you wanted them. So, you 
Mac readers and users let me know. 

FOR THOSE 



Conclusion 

Frankly, I liked the thing. It worked every lime. Slow 
but accurate. From a publishing standpoint it could fill a 
void - that of compressing the program listing space. Or 
even better, publishing programs where none were 
published before. However, unless a lot of readers have the 
reading device, forget it. And I don't think a lot of users 
will pop for the system until they can see some real 
benefit, to them, for the cash outlay. Which just goes to 
show how difficult it is to gel a new technology off its 
knees and into the running position. Even a really good 
one. And the Cauzin Sysiem is a good one, from a reading 
standpoint. From a software developers angle, well, I don't 
know. ..time will tell. 

Additional information can be had by contacting: 

CAUZIN Systems, Inc. 

835 South Main St 

Waterbury, CT 06706 

(203) 573-0150 

EOF 

Editor's Note: Presently there are several systems able 
to run the Cauzin Strip protocol (IBM PC, Macintosh and 
Apple II). As it is machine or operating system dependent, it 
will need to be ported to each newcomer. This normally 
leaves some of the smaller populated systems never receiving 
a port. The OS -9 and FLEX/SK'DOS community being 
one. For that reason we would need someone to do a port of 
the software if we were to use strips for code, .both ASCII 
and binary. 

Of course, our Macintosh readers will have no problem, 
but the rest will have, unless we get a port. I just wondered 
if any of you would like to make an attempt. If so. let me 
know and I will take it from there. 

We would be willing to publish software (code/binary) in 
68 Micro Journal, if there were sufficient numbers of you 
out there with Caiain readers. 

DMW 
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Cad for Software: 

68000, C, Basic09 
Sculptor 



We are receiving calls or td letters from numer ous 

sources, k^chjaVrg users, business and others 
looking for OS*9 68000 softwoie; applcoltons. etc. 

Many of you hove developed software that with 

Utile change could be adopted for others. If you 

are Interested In selling it, please let us know. There 

is a growing market out there now . Get in on the 

ground floorl 

If you can use additional Income and have some- 
thing lhat might be of Interest, cal and to* to Larry 
or Don. 



S.E. MEDIA Division 

POB849 
Hixson. TN 37343 

Telephone (61 5) 842-6809 
Telex (510) 6006630 



CPI 



SK* DOS 

Th* Gvwtc DOS * Ua 68X10 «Oi<#t«n» m 

* Induarui Control 

* Educational Convwi^ 

* Scwnlific Ctftnpuimg 

* Mumftv Crv«**^ 

* 0«*c*t«d SvfW". 

* Tumkty SyiitTit 

* Otu Cel*«tt«on 

* Sin?* board CojnjRibtrj 

* Bw^of it'-itd Comouiin 
ft Gnomic* Wortft«1<OM 
ft Ona-Or ♦diocf 9yirmM 
ft Advoncod Kat*r* rt < i ;* 

SK«OOS 4 * tinajla-uwr rtiifc on«««ttn4 system lor osnpuian Ma*"*) Motorola 33 bit CPUs 
tucN m ttw 60006, 60000. 68010. ami 6002a It provKfet th* ponrar of a full DOS. r« It 
•Impl* and •«« to u*t. »fld will run on iv*»#m» tram 32K to 16 mfoabrltt, Btvcurti 
SK«OOS I* aatJly ,m pieman fed on a new* ivilam, wt call it ' Tha GanafK DOS'* wnkh 
•Mow* PrOQrami written f<y ona vvitom to ha run on many otheri. 

SK*OOSc0**M«>(h ovtr 40 ■ommandt and svitafnoroo^frnt, inctudinga 6909amw<alor 
wt»kh allow* 66K SK«OOS la run aoplkat«n p/oaram»»ftdiif^*g«a«^opadFof 6800 
SK*DOS and othar i v itamt A darnel an. adnwt. and h-oKtf »rv> lano*ao» tupoon ara 
avlHabia from third party loHwar* vendor* and throve/, public domain eafnavt- 

BK« OOS it avallabla for »w*#*e-COQv Of dealer wla*. tl wall aaOEM ikamlnp^ Single OQpieft 
con SI7& floQuirt at to available fyitemiJ Ektramcfy attractive OEM rieantfno, tarmt we 
aiao avallabla. An optional Cm figuration Kit contain, a detailed Configuration Uanuai 
and two diaVi of tourxe coda for ryrtam «]aput»oa including aovrc* coda lor a ivfuvn 
monitor/dafttg ROM and otner program, utatul for adapting SX • OOS To naw tyftemL 

SK'DOS 



a **+!*&** from 



Star-K 



k SOFTWARE SYSTEMS CORPORATION 

FO 80x108 MT KltCO. NY10M8 »f(lii 0787 
TSUX «1000l877« 



SOFTWARE FOR 680x AMD MSDOS 



DISKETTES & SERVICES 



SUTOl SLEUTH OGASSEMBLERS 
EACH f**-FLEX S101-O&S SIOO-UNIFLEX 
OBJECT-ONIY nnkwt Each uo-H.tH.OS/a.CCCO 
«iW*«ftrar r ' gmau>nan iW Mti UMl mduoo >r* briar y KMing 
•poorly 8000.1 7.5 .i.lMVa WW or Z6W0O0O.S vwtnn 
OSAr -raraon Ma aneaaaaa FLEX term* tffM No MM 0S9 
COCO OOS avakabta In 8800 1 3J.S 8B*SOS wnn (nut WVflneo.5) only 
HEW: 88O10 «ut«*mbl*r $100.FLEX.OSf».UNIFLEX.OS/»-88K.M9OOS 

CROSS ASSEMBLERS WITH MACRO CAPABILITIES 
EACH $50FLEX.OSI9,UNIFLEX, MSDOS ANY 3 $100 ALL $200 
•pacify for I W«.8S02.8«0 1, 88W.8oW,SeW.*8.Z8O.a04«.aX>5 1.8085,68000 
modular ciotl auamUori m C »!h kna. unload utiirtraa HOW ; Q3.*4SK 

SCtt (rxx (MOOI aourcaa lot aadrtkvul $50 uui $100 Ur 3. $300 lor al 

OEBUGGMQ SMUl ATOHS FOR POPULAR 9-BTT UCROPROCE SSORS 
EACH STSFLEX $100-03/9 $80-UNIFLEX 
OOJECT-OHI.T nnl<rm: EACH ISO-COCO FLfXCOCO OSV* 



nmoh lor 880011, (14)8808. U03. 8(08 OS*. 00 FLEX 

ASSEMBLER CODE TRANSLATORS FOR 8402, B800/1.6809 

8602 10 8808 87S-FLEX S85-OS* S80-UNIFLEX 

8800/1 is 8808 8 8808 W mOctHr* IHMlfX $78-C*9 880-UNIFLEX 

FULL-SCREEN XBASIC PROGRAMS •*» 
AVAILABLE FOR FLEX. UMFLEX. ANO MSDOS 
OtSPUVOENEFVkTOfVOCOJUENTOn 880 

UltMS LIST SYSTEM 1100 

KVthTOHV WITH UUP 81 00 

tabula nmnynrtfritrrr iido 

DISK AND XBASIC UTt-ITY PROGRAM LIBRARY 
$50 FLEX $30-UNIFLEXIMSOOS 



«v«£X 



i MTM OJ Hoi BASIC pn/Kn. nt BASC pmoMn. ML 
•snAAxtturlindn 



CM0OEM TCLK31MUUNC* TiOMS PROGRAM 

$10t>FLEX,OS/».UNIFLEX.MS-DOS,OS/»-68K,UNIX 
OUECTOKIY v»rt^««: EACH $80 

mrmfrun iwh wrmifm moot Ma turater MOOEM7. XON XOFF. ok 
»» COCO imlro>OTXO:a>WJr»»ial COCO nga»oi rpl >«> k> 7*m R a il 



S.2S" DISKETTES 

EACH 10 PACK $12.50 SSSD'SSDD/OSOO 

tnwtz"nn.aiw1MI 10OXOJ*!'*. wiffiTyv* pMi. hj>rr^», anji w 

ADOmOMA L SERVICES FOR THE COMPUTING COMMUMTY 
CUSTOMIZED PflOORAMM8NQ 

wmj w« aMto/mu any or »io orosTirfti clpi i uri) n fr*> oA^ia^ioji or in ou> 
troorwi 10" w»omn4am&*wi um t» to comr naw pTBOBtoi.tr* o\»o« 

lor tuch oaoNixui 6fm^H upon ** mtnuaiUllly or rhr, rnodlratrani 

CONTRACT PROGRAMMING 
wo Mil enrflo nptriiiva"* or rnoaVy o««1rxj prooTo m* on ■ anrkra boon. 
■ OrrMaB «ro new* pnjwfBjd «or Irror rjwar ty yorn. rho CQrripulon) an wrMcrl «ri 
h>V p j r r OrTI M r ) OQnvOol proaromm^o rxVXJ*rnorJ popular rnaoaa 0/ 

nrrtrm. vrfuolnr) ISM Bunourjhn. Ulwac. Ilr». ) iirf. mo* panular 
pua o fr o) mfmamp i—a. noUOV^l OECBM.OQ. r*. ATaT. artamoB 
papular oranda oHiaUILUitMrn. <nduOVi( fwJOO/1 BROS. ZB0. 8502. 
88000. uang mo> «v"l»al r<VK7a and opnar^ lyakrr*. on fr*»ni 
ranpng m ua torn liroa oamrnnam t> W>or» board gonraan. 
8W enaroa tor omrj anx/vnmtxi i ■■*! TirriTir n-"i — If 

CONSULTMQ 
*• arhv > mo* ranai of omama an) MBrM conauang aanna, «AraVig 

aWNrWI, AdMSft, ITftatUHQy tflB OHQr\ OA AT*f BpHl (■Ifty ID QDmpuiafi 

no tfiarna tor ooraarang « n orrn ati taaad upon ana. aairat anginal a ■ 



Compuatf Syaioma ConOuliUnls, Inc. 

1454 Ulta Una, Conyara. OA 30207 

Taltphona 404-«83-«570 Of 1717 

Wo Uk» ordara 81 any lima, but plan 
long dlscuaalona allsr 6, H poaalblo. 

Contacl ua about catalog, da a lor, dlacounta. and aarvtcaa. 
Moil program* In aourc*: glva computar, OS, dlak alia. 
2S% off multipta purchaaaa of aama program on ona ordar. 
VISA and MASTER CARD accaplad; US tunda only, plaaaa. 
Add OA aavaa ui (If In OA) and S% ahlpplng. 

IWnAEX»"Ta»ra«<8Jr«arM C i w i m rai^OSl»l* uu .«a,ClXX3Tard>7aSXMMoraaat 
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OS-9" 
User Notes 



By: Peter Dibble 



The publisher* of 68' Micro Journal ere proud Co sake 
available Che publication of Peter Dlbblea 

os9 usKi mrrts 

Inforatatloe for the IICIBHEB Co the HO, 
tegular or CoCo OS9 

Bslog 0S9 

HELP, HINTS, PROBLEMS, REVIEWS, SUCCESTIONS, COMPLAINTS, 

OS9 STANDARDS. Generating a New Bootstrap, Building a 

new System Disk, OS9 U»ere Croup, ecc. 

rrograa Interfacing to OS9 

DEVICE DESCRIPTORS, DIRECTORIES, "FORKS", PROTECTION, 
"SUSPEND STATE", "PIPES", "INPUT/OUTPUT SYSTEM', etc. 

FTofraaadog Languages 

Assembly ljnxuis' Prograae and Interfacing; Baslc09, C, 

Paacal, and Cobol revlewa, programs, and ueea; etc. 

Osaka Include 
■o typing all the Source Ustiags In. Source Code and, 
where applicable, ssteabled or compiled Operating 
frogreas. The Source and Che Diacuaalona in the 
Columna can be uaed "aa la", or as a "Starting Point" 
for developing your OHM sore powerful Programs. 
Prograaa soaetlaea uae multiple Languagea auch aa a 
ahort Aaaembly Language Routine for reading a 
Directory, which is then "piped" to a Baslc09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeaet -- w/ Source Listings 

(3-HoIe Punched: 8 » 11) 

Deluxe Uoder S5-50 



All Source Listings on Disk 

1-8" SS, SD Disk $14.95 

2-5" SS, DO Dlaka S24.95 




FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publiahera of 68 MICRO JOURNAL are proud to 
eke available the publication of Ron Anderaon'a FLU 
SEI NOTTS, in book form. Thla popular Monthly column 
haa teen a regular feature In 68' MICRO JOURNAL SINCE 
1979. It haa earned the reapect of thousands of 
68 MICRO JOURNAL readera over the years. In fact, 
n'a coluan haa been deacrlbed aa the 'Bible' for 68XX 
uaera, by some of the world's leading microprocessor 
professionals. The most needed end populsr 68XX book 
available. Over the yeere Ron's column has been one of 
the bo st popular In 68 MICRO JOURNAL. And of courae 
68 MICRO JOURNAL is the most populsr 68XX aagarlne 
published . 

Listed below are a few of the TUT files included in the 
book and on diskette. 

All TEXT lues in tlie cook are on me disks 

LOGO C1 File load program lo oNset memory — ASM PIC 

MEMOVE Cl Memory move program — ASM PIC 

DUMP CI Pnnler dump program — uses LOGO — ASM PIC 

SUBTEST C1 Simulation ol 6800 code to 6809. stow differences — ASM 

TERMEM C2 Modem input to disk lot other port input to Ask) — ASM 

M C2 Output 3 lie to modem tor another port) — ASM 

PR INTC3 Paralel (enhanced) primer driver — ASM 

MODEM C2 TTL output to CRT and modem (or other po<i) — ASM 

SCIPKGC1 Scientific math routmes — PASCAL 

U C4 Mini-monitor, disk resident many useful functions — ASM 

PRINTC4 Paralel pr nter driver, witlwut PFLAG — ASM 

SETC5 Sel pninBr modes— ASM 

SETBAS1 C5 Set printer modes — A- BASIC 

NOTE: .C1..C2, etc. -Chapter I, Chapter 2, etc. 

••Over 30 TEXT fUea Included la ASM (asseabler)-PASCAL- 
PIC {position Independent code) TSC BASIC-C, etc. 

Book only: $7.95 + $2.50 S/H 
With disk: 5" $20.90 + $2.50 S/H 
With disk: 8" $22.90 + $2.50 S/H 



Snipping A Kindling $3.30 per Book, $2.30 per VHsl set 

Foreign Orden Add $4.50 Surface Mail 

or 47.00 Ait Mai) 

If paying by check • Pleaie allow 4-6 weeks delivery 

•All Currency in U.S. Dollan 

Continually Updated In 68 Micro journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd, 

Hlxson, TN 37343 



FLEX la a trademark of Technical Syateas Conaultanta 
"059 la a trademark of Mlcroware and Motorola 
"6IT Micro Journal la a trademark of Cosputer Publishing Inc. 



(615) 642-4601 

Telex 5106006630 
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Omega . . . The Desktop Mainframe 

12,5 MHz MC68020 32-bit microprocessor & MC68881 FPCP as standard. 

1 megabyte of non-volatile, zero wait-state STATIC RAM and 128k/256k bytes ROM. 

25.5 megabyte (unformatted) Winchester Hard disc as standard. 

1.0 megabyte (unformatted) DS/DD 80 track floppy disc drive (specify 5V«" or 3!£"). 

Five RS-232C serial ports (one may be configured as an RS-485 network node). 

One Parallel printer port and one 16-bit bi-directional parallel port. 

Non-volatile clock calendar and power supply supervisor. 

OS-9/68K'" 'Professional' with full MC68881 FPCP support and 'C compiler. 

OMEGA'12.5/OS OMEGA w 12.5 MHz020/881 &OS-9/68K IM $4750.00 

OMEGA w/1 6.67 MHz 020/881 & OS-9/68K ™ $4950.00 

1 megabyte additional STATIC RAM $ 895.00 

9 port RS-232C serial expansion board $ 645.00 

640 x 480 x 4 bits/pixel ACRTC graphics l/F $ 925.00 



OMEGA/16.6/OS 
OMEGA/1MB 
OMEGA/SER9 
OMEGA/GRF 



PRICES INDICATED INCLUDE SHIPPING AND APPLY TO U.S. CUSTOMERS ONLY 



c 



VISA/MASTER CARD ORDERS ACCEPTED 



} 



OS-9 is a trademark of Microware Systems Corporation 
NON-U S CUSTOMERS SHOULD CONTACT THE NEAREST DEALER FOR PRICE & DELIVERY INFORMATION 
NORTH & SOUTH AMERICA ALL OTHER ENQUIRIES CONTINENTAL EUROPE 



LLOYD I/O INCORPORATED 

19535 NE GLISAN 

P.O. Box 30945 

PORTLAND, OR 97230 (USA) 

TEL: (503) 666-1097 

TLX: 9103805448 LLOYD I O 



WINDRUSH MICRO SYSTEMS 

WORSTEAD LABS. 

N. WALSHAM, NORFOLK 

NR28 9SA, ENGLAND 

TEL: (0692) 404086 

TLX: 975548 WMICRO-G 



SNIJDER MICRO SYSTEMS 
SCHOOTEINDSEWEG 8a 
5756 BD Vlierden 
The NETHERLANDS 

TEL: (0)4930-11975-13666 



— / 




12" x 12" 

On-board power supply . . . 
only requires external 
10 VA transformer. 

5 x RS-232C serial ports. 

SCSI initiator. 

FDC controller 

Parallel printer port. 

16-bit bi-directional l/F 

Non-volatile clock calendar 

Fully buffered bus expansion 

QUANTITY DISCOUNTS 

2- 5 less 5%, 6- 9 less 10% 
1 0-24 less 1 5%, 25-99 less 20% 
100+ less 25% 



12.5 MHz MC68020 32-bit processor and 12.5 MHz MC6888 1 Floating Point Coprocessor 
plus 1 Mb non-volatile, zero wait-state 100% STATIC RAM all AS STANDARD! 

flmega . . . The OEM's CHOICE 



OMEGA/12.5 

OMEGA/16.6 

OMEGA/LTX 

OMEGA'IMB 

OMEGA/SER9 

OMEGA/GRF 

OMEGA/OS9 



OMEGAw<12.5MHz020 881&1MBRAM $2750.00 

OMEGA w/16.67 MHz 020 881 &1 MB RAM $3295.00 

OMEGA 120/240 VAC Line Transformer $ 22.00 

1 megabyte additional STATIC RAM $ 895.00 

9 port RS-232C serial expansion board $ 645.00 

640x480x4 bits/pixel ACRTC graphics l/F $ 925.00 

OS-9/68K™ 'Professional' configured for OMEGA $ 595.00 



PRICES INDICATED INCLUDE SHIPPING AND APPLY TO U.S. CUSTOMERS ONLY 



c 



VISA/MASTER CARD ORDERS ACCEPTED 



) 



OS-9 is a trademark of Microware Systems Corporation 

NON-US CUSTOMERS SHOULD CONTACT THE NEAREST DEALER FOR PRICE & DELIVERY INFORMATION 
NORTH & SOUTH AMERICA ALL OTHER ENQUIRIES CONTINENTAL EUROPE 



LLOYD I/O INCORPORATED 
19535 NE GLISAN 
P.O. Box 30945 
PORTLAND. OR 97230 (USA) 
TEL: 1503)666-1097 
TLX: 9103805448 LLOYD I O 



WINDRUSH MICRO SYSTEMS 

WORSTEAD LABS. 

N. WALSHAM, NORFOLK 

NR28 9SA, ENGLAND 

TEL: (0692) 404086 

TLX: 975548 WMICRO-G 



SNIJDER MICRO SYSTEMS 
SCHOOTEINDSEWEG 8a 
5756BDVIierden 
The NETHERLANDS 

TEL: (0)4930-11975-13666 
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ESTABLISHED 1979 



ASSEMBLY 

LANGUAGE 

DEVELOPMENT 

SYSTEMS 



VANTAGE "^^e, 

weapon thai speeds the desigit-axle-tesl 
phases of developing your ideas into real 
concrete products. VANTAGE Is a three part 
package ol integrated software including: 

ED* Editor 

CRASMB" Macro Cross-Assembler 
CRACKER" Symbolic Debugger 

The system speeds up development time 
because the editor, assembler, and dWXigger 
talk to each other directly with out having to 
exchange data on Stow disk 'lies hi fact the only 
time you need to use the disk is to save your 
source code when you go home for the day 

VANTAGE is compatible with EPROM 
programmers available on some 0S9<t38000 
computers, EPROM programming is made 
easy with the built in program, verify, check, 
copy, arid read EPROM commands 

The 'ssf full screen EDilor is used to code your 
assembly language program. It is very poweitul, 
including line numbers, source code cross- 
referencing, 10 edit buffers, command macros, 
side tile functions, access lo 0S9, etc. When 
you are ready to assemble, you simply call the 
cross assembler. It assemblas the source cod e 
nghl out of the editor's text bufler(s). 

CRASMB is packed with many features to 
spaed your devetofynen t (Ob- Powerful macro 
features, symbol cross referencing by line 
numbers, and plain English error massages 
are among these CRASMB offers the besim 
compatibility with the manufactures' assembty 
languages. The generated object code is 
placed directly into the debugger's 64K of 
target ram, or on a disk file in S 1 , Intel Hex. or 
Binaiy forms. The symbol table remains intact 
tor use by the debugger 

CRACKER Is chalk-lull of so many features 
that it allows you to attack a deouggi ng situation 
several ways Since you have lust assembled 
your program, your object code is already in 
memory 

CRACKER features a software simulator, 
dis-assembler, interactive assembler, memory 
examine, memory search, dynamite breakpoints 
and other supportive commands. Breakpoints 



are the key in testing software, so we went all 
out in our research and development of the 
breakpoint system We looked at other 
debuggers on several different compul ers. and 
talked with many assembly language 
programmers. CRACKER has easy to use 
breakpoints, but at the same time they are very 
powerful, including; conditional breakpoints, 
unlimited scope, memory protection , many types 
of actions including the execution ot a macro- 
breakpoint-language lor simulation of hardware 
devices. Expressions may use symbols that 
were defined in the assembty process to specify 
memory address values. Braakpoi nts remember 
the symbol names making it easy to make 
changes to your source code without having to 
kill and enter new breakpoints. The simulator 
allows you to execute your object code In a 
controlled environment. II things get out-ol- 
wack, your memory protection and breakpoints 
will keep the simulation under control. Single 
stepping displays the registers and either a 
dis-assembly of the instruction about to be 
executed or a listing of the source code line 
from the editor thai generated the object code, 
i.e. source code debugging is built in. 

SERVICE includes a 1 year tree update period 
from the time of purchase. We ship within 4 
working days and use UP&BLUE Each copy 
is custom manufactured to your computer disk 
size and formal. 



Supported CPU's 


CRASMB 


CRACKER 


6800.02,08 


6800.02,08 


6801,6301 


6801.6301 


6303 


6303 


6804 


6804 


6805 


6805 


6809 


8809 


6811.H11.HC11 


6811.H11.HC11 


6503 


BY2Q87 


1802 


BY 2087 


TMS7000 .20.40 


BY 2087 


8041.8741 


BY 3087 


8046.20 21 22.ETC 


BY 3087 


8051.31 


BY 3087 


8080.85 


BY 3Q87 


28 


BY3087 


280 


BY4087 



For 0S9/68000 $795 

Includes all Supported CPUs 
(51 2K Memory Required) 

CRASMB ONLY (OS»fS8000) *432 

CRASMB ONLY (OS9/6609) , $399 

ED ONLY (OS9.68000) S 63 

CRACKER and ED ONLY 

(OS9rca000) S495 

DEALER TELEPHONES 

USA 

SE S.E. Media Supply 

NE Frank Hogg Lab Inc. 

SW GESPAC, Inc. 

NE Tnomas Instrumentation 

NW D & S tndustnes 

NW Stylo Software 

AUSTRALIA 

Paris Radio Electronics 
DENMARK 

HC. Andersen Computer A'S 152 44 04 
ENGLAND 

Vivaway Ltd. 

Windrush Micro Systems 
FRANCE 

Mlcrpdata-Sott 

Computer OuDysts France 
WEST GERMANY 

Dr. Rudolf Kelt GmbH 

Zacher Klelncomputer 
JAPAN 

Seikou Electronics Co. 

MOutooards , Inc 
SWEDEN 

Mfcromaster Scandinavian AG 018 138595 
SWITZERLAND 

Elsoft AG 056 83 33 77 



1 615 842 4800 
1 315 474 7856 
1 602 9BB 5559 
1 809 987 4280 
f 206 827 7300 
1 208 529 3210 

02344 9111 



582 423 425 
692 404 066 



1 768 8080 
1 4789 8442 



62 03 6741 
85 25 299 



03 632 6000 
474 22 1741 



VISA - MASTERCARD ™^ 
DEALER and OEM inquiries invited 
VANTAGE. ED. CRASMB. CRACKER 

are trademarks of LLOYD I/O, INC. 

OS9 is a trademark of Mteroware 

Our Development System 

is a GMX Computer 



LLOYD I/O, INC. • P.O. Box 30945 • Portland, OR 97230 • USA 
Attn.: Frank Hoffman • Phone 1-503-666-1097 • Telex 910 380 5448 LLOYD IO 
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SOFTWARE** 
'HARDCORE 



tFORTH® 

from TALBOT MICROSYSTEMS 
NEW SYSTEMS FOR 
6301/6801, 6809, and 68000 



" FORTH PROGRAMMING TOOLS Irom the 68XX4X •• 
•• FORTH specialists — get Ihe beslf! " 

NOW AVAILABLE — A variety ol rom and disk FORTH systems lo 
run on and/or do TARGET COMPILATION lor 

6800, 6301/6801. 6809. 68000. 8080. 280 

Write or call lor information on a special system to lit your require- 
ment. 

Standard systems available lor these hardware— 

EPSON HX20 rom system and target compiler 

6809 ram systems lor SS-50. EXORCISER, STD. ETC. 

COLOR COMPUTER 

6800/6809 FLEX or EXORCISER disk systems. 

68000 rom based systems 

68000 CP/M-68K disk systems. MODEL 11/12/16 

IFORTH is a relined version ol FORTH Interest Group standard 
FORTH, faster than FIG-FORTH FORTH is both a compiler and 
an interpreter ll executes orders ol magnitudes faster than inter- 
pretive BASIC MORE IMPORTANT, CODE DEVELOPMENT 
AND TESTING is much, much faster than complied languages 
such as PASCAL and C. If Software DEVELOPMENT COSTS are 
an Important concern lor you, you need FORTH! 

firmFORTH" is lor the programmer who needs to squeeze the 
most into roms. II is a professional programmer's tool for compact 
rommable code for controller applications. 

* If WTX and tirrnFORTH lit Uaflamwkl 0* Tafcot <*cpo*Y«vt* 

* FLEX ■» * IraOww* si Tacrine*! Sytlwns ComuflarHJ Inc 
- CPM48K a baderiwa, ol Cvim R««an*t Inc 



— > IFORTH SYSTEMS < — 

For all FLEX systems: GIMIX, SWTP, SSB. or EXORcisor Specify 
5 or 6 inch diskette, hardware type, and 6800 or 6809 

" IFORTH — extended llg FORTH {1 disk) $100 ($15) 

with fig line editor. 

" IFORTH + — more! (3 5" or 2 8" disks) $250 ($25) 

adds screen editor, assembler, extended data types, utilities, 
games, and debugging aids 

" TRS-B0 COLORFORTH — available Irom The Micro Works 

" lirm FORTH— 6809 only. $350 ($10) 

For target compilations to rommable code 
Automatically deletes unused code. Includes HOST system 
source and target nucleus source. No royalty on targets. Re- 
quires but does not Include (FORTH + . 

•• FORTH PROGRAMMING AIDS — elaborate decompiled 50 

*" IFORTH lor HX-20. in 16K roms lor expansion unit or replace 
BASIC $170 

" IFORTH/68K for CP/M-68K 8" disk system $290 

Makes Model 16 a super software development system 

" Nautilus Systems Cross Compiler 

— Requires: IFORTH + HOST + at least one TARGET 

— HOST system code (6809 or 68000) $200 

— TARGET source code; 6800-$200, 6301 6801— $200 
same plus HX-20 extensions — $300 

6609— $300 , 8080/ZeO— $200, 68000- $350 

Manuals available separately — price in | ). 
Add J6 system tor shipping, $15 for foreign air 



TALBOT MICROSYSTEMS 1927 Curtis Ave., Redondo Beach, CA 90278 (213) 376 9941 



fnfjfd synwn« WortJ-wlri» 

OVIR 10 YTJVt* or WOICA1E0 0<J*UTVI 



r i A Division of 
* Comfuttr Publishing, Int. 
3900 Cuunlrm Smith Road 
HJxkm. Tn 37143 
TeVffwNxie 61 5842-4800 
Telex 510 600-6630 



DATA-COMP 
SPECIAL 
Heavy Duty Power Supplies 

For A limited time we are offering our HEAVY DUTY SWITCHING 
POWER SUPPLY. These are BRAND NEW units and will not last 
long. Also note that these prices are less than 1/4 the normal price 
for these high quality unit. 




SIze ItXS x 5 « IS tacfcea - taduiini bony owning 
tnatetano' 1 



n ll<yZ20 volu ac (strap chjuji) Out' 130 no 

Output *Sv . 10 gnfB 
.12»-4J aapt 
»l2r-2.0«aipi 
-12* -OJ anya 

Mjffibl Cmhmb— TcrarinaA tfrip 

toad t u m akn' AiouwCic ataft dnaril i i uimj 

BhSj 

SPECIAL: $59.95 
2 or more 49.95 



Add: $7.50 eacrS/H 



Make: BwUxtt 

Sire: 10.75 i *J x 125 mctxa 

Rjatat; 110/220 ac (csv change) Out 81 

Oapun; »Sy . M am 
+12* . 24 aap 
♦12v -24 aqpa 
♦UV - 2.1 amja 
-\2' . 04 mifm 



Macog Ounkii Moau 

Load HaacBoa: Anuxnatt c iBort drain irjcovary 



SPECIAL: $49.95 
2 OR MORE 39.95 

A4t: $7J0&'He»ch 
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URP A 



«boo 



«m <<psr 



£? 



21 1 Vandal* Drive . Houston, PA TS342 



V 



x*° 



X*>° 



o^ 



Co 



x«P 



A& 



0k 



$197.50 



EDUCATIONAL AND STUDENT PRICE 




The Power of a 68000 in one compact and efficient unit 
for hardware interfacing and machine language programming 

(a self-contained laboratory) 



FEATURES: 

• 68000 M P 

• 4 K SRAM 

• 8 K EPROM 

• LED Display 

• Integral Keypad 

• Operating System 

• Cassette Interface 



OPTIONS: 

• PADC-DAC-8 M LAB™ 

8 Ch A/D, 8 Ch D/A, 8 Bits 

• Wire Wrap Expansion Board 

• Digital Signal Processors 

• and more . . . 



.TM 



pLAB and Notebook Computer 
ore trademarks of URDA 



TM 



TO ORDER: Call QUASITRONICS 
at 1-800-245-4192 IN PA (41 2)-745-2663 
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Information 

Management 

System 



CSG-IMS is a full featured relational database 
manager with the added benefit of a comprehen- 
sive structured application language. This com- 
bination makes CGS-IMS the ideal development 
tool for file intensive applications. Sophisticated 
applications can be developed in a small fraction 
of the time required for traditional languages. 

- Interactive access to databases and quick ad 
hoc queries. 

- CSG-IMS includes a recursive compiled 
language supporting program modules with 
full parameter passing. 

- User defined screen and report formats. 



PRICES: 

CSG-IMS for OS9 6809 Lll $495 

CGS-IMS for OS9 68000 $495 
CSG-IMS for CoCo3 OS9 {single user) $200 

CSG4MS for CoCo (OS9 level 1 ) $1 50 

CSG-IMS demo with manual $30 

Shipping North America $5 

Shipping Overseas $10 



Visa 



Mastercard 



ORDER FROM: 

Clearbrook Software Group 

P.O. Box 8000-499 

Sumas, WA 98295 
(604) 853-9 118 BBS (604) 859-1 266 
OS9 is a trademark of Mlcroware and Motorola Inc. 

- Record, index and file size almost 
unlimited. 

- Text, BCD floating point (14 digit), short and 
long integer and date types. 

- Run-time interpreter available. 

- Comprehensive 320 page manual/tutorial. 



!!! Subscribe Now !!! 
68 MICRO JOURNAL 



Subscription Rates 
U.S.A.: I Year $24.50, 2 Years $42.50, 3 Years $6450 
♦Foreign Surface: Add $12.00 per Year to USA Price. 
♦Foreign Airmail: Add $48.00 per Year to USA Price. 

♦Canada & Mexico: Add $950 per Year to USA Price. 

♦U.S. Currency Cash or Check Drawn on a USA Bank ! 



68 Micro Journal 

5900 Cassandra Smith Rd. 

FOB 849 

Hixson.TN 37343 



OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Mastercard D VISA □ 
Card # Exp. Date 



For 



lYear 2 Years 

Enclosed: $ 



3 Years 



Name 
Street 
Cily_ 



State 



Zip, 






Telephone 615 842-4600 
Telex 510 600-6630 



My Computer Is: 
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OS 9 



L1 UTILITY PAK— Contains all programs formerly in 
Filter kits 1 & 2, and Hacker's kit 1 plus several 
additional programs. Complete "wild card" file 
operations, copies, moves, sorts, del, MACGEN shell 
command language compiler. Disassembler, Disk 
sector edit utility, new and improved editions, approx. 
40 programs, increases your productivity. Most 
programs applicable for both level I & II 6809 OS 9. 
$49.95 (551.95) 

Call or send Self Addressed Stamped Envelope for 
catalogof software forcolorComputerOS-9and other 
OS 9 systems. 

BOLD prices are CoCoOS-9 format disk, other formats 
(in parenthesis) specify format. All orders prepaid or 
COD, VISA and MasterCard accepted. Add Si 50 S&H 
on prepaid, COD actual charges added. 

ss-soc 

MEMORY LIQUIDATION SALE! 

(While Supply Lasts) 

1 MEGABYTE RAM BOARD 

Fullmegabyteof ram with disable options tosult any 
SS 50 6809 system. High rellabillty.can replace static 
ram (or f ract Ion of the cost. $399 for 2 Mhz or $439 for 
2.25 Mhz board assembled, tested and fully populated. 

2 MEGABYTE RAM DISK BOARD 

RD2 2 megabytes dedicated ram disk board for SS 50 
systems. Four layer circuit board socketed for 2 
Megabytes! Special sale price of $399.00 includes only 
256k of ram installed (you add the rest), includes OS 9 
level 1 and II drivers for Ram disk, (note: you can re- 
boot your system without losing ram-dlsk contents). 
(Add $6 shipping and Insurance.) 

Please call for answers to your technical questions 
concerning these products. 

D.P. Johnson, 7655 S.W. Cedarcrast St. 

Portland, OR 97223, (503) 244-8152 

(For best service call between 9-11 am Pacific time.) 

OS8 (» • trademark ol Microwave and Motorola Inc. 
MS-DOS la a trademark ol Microsoft Inc. 



COMPILER EVALUATION SERVICES 

BY: Sob Ajidcra 

The SX MEDIA Dlvtafon of Computer 

PubUabhif Inc. 

k offortoi to* foUovtng SUBSCRIBER 

SERVICE: 

COMPILER COMPARISON AND EVALUATION REPORT 

Due to the constant and rapid updating and enhoocemem 
of numerous compilers, and the different utility, appeal, 
speed, level of communication, memory usage, etc., of 
different compilers, the following services are now being 
offered with periodic updates. 

This service, with updates, will allow you who are wary or 
confused by the various claims of compiler vendors, an 
opportunity to review comparisons. comments, 
benchmark*, etc., concerning the many different 
compilers on the market, tor the 6809 atierocompulcr. 
Thus the savings could far offset the small cost of this 
service. 

Many have purchased compilers and then discovered that 
the particular compiler purchased either is not the most 
efficient for their purposes of does not contain features 
Decenary for their application. Thus the added expense 
of purchasing additional compikrfs) or not being able to 
fully utilize the advantages of high level language 
compilers becomes too ecpensve. 

The following COMPILERS are reviewed ioitially, more 
will be reviewed, compared and benchmarkad as they 
become available to the author 

PASCAL C GSPL WHIMSICAL PL/9 

Initial Subscription - $39.95 

(includes 1 year updates) 
Updates for 1 year • $1430 

SJE. MEDIA • C.PJ. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 

(615) 842-4601 




68000 68020 68010 



68008 6809 6800 



Writ* or phone lor catalog. 



AAA Chicago Computer Center 

120 Chestnut Lane — Wheeling IL 60090 
(312) 459-0450 



Tacftnlcal Conaultauen avaNaMa moat omkoar* tram 4 Pal to < PM CST 
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Stop! 

Get a 25 
MegaByte Hard 
Disk practically 

FREE - only 1 C 

Be Sure to Consider the 

SPECIAL MUSTANG 

10 Sale on page 5 

When it's over, IT'S OVER! 

We don't know how long this very, very low price can be maintained, dont miss it! 

Data-Comp Div. - CPI 

'88' Micro Journal May B7 61 



6809<>68XXX 
UniFLEX 

X-TALK 

A C-MODEM/Hardware Hookup 

Exclusive for the MUSTANG020 tunning 
UniFLEX, is a new transfer program and cable set 
ftom DATA-COMP(CPf). X-TALK consist of 2 
disks and a special cable, this hook-up enables a 6809 
SWTPC UniFLEX computer to poit UniFLEX files 
directly to a 68XXX UniFLEX system. 

This is the only cuirently available method to 
transfer files, text or otherwise, from a 6809 
UniFLEX system to a 68000 UniFLEX system, that 
we have seen. A must if you want to recompile or 
cross assemble your old (and valuable) source files to 
tun on a 68000 UniFLEX system. GIMIX users can 
directly transfer files between a 6809 GIMIX system 
and our MUSTANG-020 68020 system, or GIMIX 
68020 system. AIJ SWTPC useis must use some son 
of method other than direct disk transfer. The 6809 
SWTPC UniFLEX disk format is not readable by most 
other 68000 type systems. 

The cable is specially prepared with internal 
connections to match the non-standard SWTPC SCV9 
DB25 connectors. A special SWPTC+ cable and 
software is also available, at the same price. Orders 
must specify which type SWTPC 6809 UniFLEX 
system they intend to transfer from or to. 

The X-TALK software is furnished on two 
disks. One 8" disk containing the 6809 software and 
one 5" disk containing the 68XXX software. These 
programs are also complete MODEM programs and 
can be used as such, including X-on X-off, and all die 
oilier features you would expect from a full modem 
program. 

X-TALK can be purchased witlt/wiihout die 
special cables, however, this SPECIAL price is 
available only to registered MUSTANG-020 owners. 

X-TALK, w/cable $99.95 
X-TALK only 69.95 

X-TALK w/source $149.95 

DATA-COMP 

5900 Cassandra Smith Rd. 

Hbcson.TN 37343 

Telephone 615 842-4601 
Telex 510 600-6630 



Mote; Restored MUSTANG-020 owners musl turnlsh syslsm 
aerfa I number In onto* 1o buy al tout special low prices. 



68 MICRO JOURNAL 
Reader Service Disks 

Dlik- 1 Rlesort, Minim, M'inicopy,Muiifmi, "Lifetime, 

"Poetiy. "Foodlist. "Diet. 
Dlik- 2 Diikedil w/ in«.A fixes. Prime, •Prmod. 

••Snoopy. ••FooibiU. ••Hexpawn."Lifetime. 
Dlik- 3 Cbug09. Seel. Scc2. Find. Table2. lnlexl. Diik- 

cxp, *Diskssve. 
Dlik- 4 Mailing Propam. •Finddal. 'Change. •Tesldisk. 
Dlik- 5 'DISKFTX l.*DISKFIX2. ••LETTHl. 

••LOVES1GN. "BLACKJAK. "BOWLING. 
Dlik- 6 "Puichate Order. Index (Disk tile infix). 
Dlik- 7 Linking loader. Rload. iUrkncss. 
Dlik- 8 Cnen. I-anphcr (May 82). 
Dlik- 9 Dalccopy. DiikrU9 (Aug 82). 
Dlik- 10 Home Accounting (July 82). 
Dlik- 1 1 Diiaembler (June 84). 
Dlik- 1 2 Modcm68 (May 84) 
Dlfk-13 a Inilnif68. Tenmf68. •Cleanup, 'Dikalign. Help. 

Dale.TxI. 
Dlak-14 •but. *Teil. •Terminal. 'Find. •Diafcedil. ink. Lib 
Dlik- 1 5 Modem9 + Updalci (Dec. 84 Gilchrist) to Modem9 

(April 84 Cornmo). 
Dlik- 16 Copy.Txt. Copy.Ooc. Cat.Tu, Cat Doc. 
Dlik- 17 Match Utility. RA1BAS. A Banc PrcpnKcunr. 
Dlik- 18 Pane. Mod. Size.Cmd (Sept 85 Armstrong). CMDC 

ODB. CMD.Txl (Sept. 85 Spray). 
Disk- 19 Clock, Date. Copy. Cat. PDELAnn A Doc. 

Errors. Syi. Do. Log. Asm A Doc 
Dlsk-20 UNIX Like Tools (July A Sept. 85 Taylor A 

Gilchrist). Dragon .C. Giep.C, LS.C. FDUMP.C. 
Dlsk-21 Utilities A Games • Date, Life. Madness, Touch. 

Goblin, Sunhot. A IS more. 
Dlsk-22 Read CPM A Non-FLEX Disks. Fiaser May 1984. 
Dlsk-23 ISAM. Indexed Sequential file Accessing Methods, 

Cauda* Nov. 1985. Exlcnii ble Table Driven. Lan 

guage Recognition Utility, Anderson Msrdil986. 
Dlsk-24 68* Micro Journal Index of Articles A Bit Bucket 

Items from 1979 - 198S. John Current. 
Disk. 25 KERM1T for FLEX derived from the UNIX ver. Burg 

Feb. 1986. (2)-5" Disks or (l)-8* Disk. 
Disk-26 Compacu UniBoard review, code A diagram, 

Burlison March '86. 
Disk -27 ROTABlT.TXT.SUMSTE5T.TXT.CONDATA.TXT. 

BADMEN.TXT. 
Diak-28 Cr-82 Emulator, bit mapped. 
Disk 29 ••Slat Tick 

Dlsk-30 Simple Winchester, Dcc'86 Green. 
I>lsk-31 ••• Read/Write MS/PC-DOS (SK'DOS) 
Dlsk-32 flier-UNIX Type upgrade - 68MJ 2/87 



NOTE: 

Ihii is a reader service ONLYI No Warranty is offered or implied, 
they are as received by 68' Miao Journal, and ait for reader 
aonvcnicncc ONLY (some MAY include fixes or patches). Also 6800 
and 6809 programs are mixed, as each u fairly simple (mostly) to 
convert to the other. Software is available to cross alterable ail. 

• Owes 6800 - •• Denote BASIC 
••• Denotes 68000 - 6809 no in&calor. 



Specify 8" disk $1950 
5" disk $16.95 



Add: S/ll - S3 JO 
Overseas add: $4.50 surface - J7.00 Air Mail. USA Dolhus 

68 MICRO JOURNAL 

PO Box 849 

Hixson, TN 37343 

615 842-4600 - Telex 510 600-6630 
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6809/68008 SINGLE BOARD COMPUTERS 

The Peripheral Technology Family of Single Board Computers is a Low-Cost Group Which 

Ranges From an Entry Level 8-Bit Version to a Powerful 68008-Based Board. A Product is 

Available to Fit Almost Every User's Requirements. 

PT8BK-1 



PTB6-S 

• 6809 Processor/2MHZ 
Clock 

• 4 RS-232 Serial Pons 

• 2 8-Bit Parallel Ports 

. 4K-16K EPROM/60K Ram 

• Parallel Printer Interlace 

• OS/DO Controller lor 3S-80 

• Track Drives Ranging From 
SS/SD-DS/DD 

• Winchester interface Port 

PRICE $34900 




PT86-3 

• 6809 1 MHZ Processor 

• 2 RS-232 Serial Ports 

• 2 8-Bit Parallel Ports 

• 4K EPROM/59K User Ram 

• OS/OO Controller for 3S-80 
Track Drives Ranging From 
SS/SO-OS/OD 

PRICE $269.95 
OS9L1 For 
PT69 BOARDS $200 00 
SK'DOS $49 95 



PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Road. Suite 870 

Marietta. Georgia 30067 

(404) 984-0742 Telex # 880584 

VISA/MASTERCARD/CHECK/C O.D. 



• MC6B00B 10 MHZ 
Processor 

. 768K RAM/64K EPROM 

• 2 RS-232 Serial Ports 

• Winchester Interface Port 

• Floppy Disk Controller for 
2 5»-" Drives 

• 2 8-Bit Parallel Pons 

BOARD $595 00 

WITH OS9: $749 95 

WITH SK'DOS: $675.00 




"OS9 19 A Trademark Of Microwars and Motorola 



Send For Catalogue For Complete Infoi 



On All Products 



XDMS-IV 

Data Management System 
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Save $ 1 00.00 - Limited Time 
Regular $350.00 j^towrCKfy 

$249.95 



FOR 6809 FLEX-SK-DOS(5/8") 

Up to 32 nr»T"*"— XAm per ncwdt Up to 12 diinco fiod aune! Up to 1034 byie rascal Uter 
defined acnm tad prim coeai! Ptuw Qe*l Farm f3ea! CondaUOTal czauionl Pieces* 
c^nraofl Upwanl/l>Bwn ward, file UnkingT FUc jarartg! Rjuvkxn Ale vinual ptgjoftl Baifi ui 
uiilitiear Uuill in icju line editorl Fully tewjan oriented! GruSinced format Boldface, Double 
width, IiaIio and Underline «upj**ttd I Wnnon in canpect iirunured ■ucmbieil Integrated ft* 
FAST tumMi' 

XOMS-1V Dat* M«A«cnn<nt SjKctd 

XDMS-IV b • brmnd new approach to data nwwpmcA It aot only ponuu users io 
eiaacrk>«, omrx «nd i(Ub» tUu . but also to pnzXB cnusc files protTucang txuknuad reprmt. 
* unu i diapliya and I'ile outpiiL P n*-i *iin ■, c*n cowitt of any of a act of standard high level 
function indo&ing record and TieH «*Ucu^» » i acting and aggregation, lookupa m other liJiu, 
apodal ptcoonna; or record aubaeu. custom report formatting, totaling and aubtotaling, «nd 
prwumvi of up to three related fBca ai a "database* an tucr dx^narJ output rcfona 
POWERFUL COMMAND61 

XDMS-IV cxsnbvra the fart-aixiajfr y of many popular DBMS software aycuvn* with a new easy 
to uac conmand set into ■ tingle uaegntod paciage. We've included many new featurei and 
ooomindi OTchidrog a aetoffenaal file utilities. The prociMaung earrunanda are Input FW**j. 
Oopdi (IPO] onaSarl wlucn allows atmon intrant implanaiuilion of a [ram 000471 
SESSION ORIENTED! 
XDMS-IV u leaaSan ahaiifid. Enter "XDMS" and yott ire m inaUat ainmmd of all the 
feature* No more wuling f or a ammiod to toad in from disk I Miny cxarimands are *7TUTMsli#lc, 
nich u CREATE (We &£mha*\ UPDATE (Sic editorX PURGE and DELETE (uniiiia) 
Othea are pram comnunda which are uaod to create a uaer praceu which u ejteevtad with a 
RUN o«i«fiand. Eiihcr miy be enlered into a "prcctfsa* file which u exocxruxt by an ({XBCUTTi 
aitrnmL fW~»« may aaocuc other pn"*i«, or Uusnaelvei. other c™«lUwraH y or 
vsarxndk>onai)y. Mcrua and fcrcot prom pu are eaaiJy oaAmi, «rut enfife uaer appUcattona cao be 
run vitboui ova tcavuig XDMS-IV! 

rrs easv to usfj 

XDMS-IV ke*»pi da u mam gem«« aanplel Rather than den gn a oonpt^r, DBMS which hides ihc 
tnte nature of Ihcdita, we kept XDMS-IV fde onortod. TKe user vi e w of diia relaUonaNipa u 
pratriied in repnfta and acrecrt output, while \ he actual dau ren'doc in easy to maintain file*. Thu 
fUrpod pamila cuauxrusad pnscrtfation and rqporta wuhout complex rodefbubon of ihedn«ba«e 
CJn and •xmeorre. XDMS-IV may be uaed f<* a mAc aoge of appucatiooa fiaro nrpplensvwd 
uiarugcmzit ayatona (addtreaaea. urvoaay ,) to mtcfTmud daubaae lyvtooa (order talsy, 
«em**tn B y I ThcpcK^r^ueaareunlirrated. 



Visa & Master Card Excepted 
Telephone: 615^42-4601 or Telex: 510 600-6630 
Or Write: S.E. Media, 5900 Cassandra Smith RdL, 

•l^TEX^ Tecnkal SysUntf ComuIUij^ SK«D«S™ STAR^KITS Cbt> HUsdci, TettTt. 37343 



Technical tciepnon* aaak(Uncc TH 9t4-«41-J552 (Efaiin|ll 
l.KX~ Tecnkal SysUntf CowuJla nta, SK«D«S~ STARKTTS Cbap. 
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r^ WmW *L. lnC - 1337 WEST 37th PLACE 

GMX MICRO 20 PRICE LIST 

MICRO 20 (12.5 MHz) U/l SAB $2565.00 

MICRO 20 (16.67 MHz) U/l SAB «2895.00 

MICRO 20 (20 MHz) U/l SAB $3295.00 

OPTIONAL PARTS AW ACCESSORIES 

&8881RC12 $ 295.00 

68881RC16 $ 395.00 

M0T0R01A 68020 USERS MANUAL $ 18.00 

MOTOROLA 68881 USERS MANUAL $ 18.00 

SBC ACCESSORY PACKAGE (K20-AP) $1690.00 

The package includes a PC-style cabinet with a 
custom backpanel a Xebec 1410A hard disk control- 
ler, a 25 Megabyte (unformatted) hard disk, a 
5 1/4' DSHD §0 track floppy disk drive, a 150 watt 
power supply, cooling fan, panel mounted reset and 
abort switches and all necessary internal tabling 

BACK PANEL PLATE (BPP-PC) For Above $ 44.00 

2nd 5*80 FLOPPV t CABLES FOR H20-AV, A00..$ 250.00 

SECOND 25KB HARD DISK 1> CABLES, ADO $ 780.00 

TO SUBSTITUTE 85MB KD FOR 25HB HD, ADO.... $1800.00 

I/O EXPANSION BOARDS 

16 PORT SERIAL CARD ONLY (S8C-16S) $335.00 

The SBC-16S extends the 1/0 capabilities of the 
GHX Micro-20 68020 Single-board Computer by adding 
sixteen asynchronous serial I/O sorts. By using 
two SBC-16S boards, a total of thirty-six serial 
ports are possible. 

RS232 Adapter (SAB-25,SAB-90 or RJ-45) $165.00 

The board provides level-shifting between TTL 
level and standard RS-232 signal levels for up to 
4 serial I/O ports. 

60 LINE PARALLEL I/O CARD (S3C-60P) $398.00 

The GMX SBC-fcOP uses three 68230 Parallel Inter- 
face/Timers (PI/Ts) to provide up to forty-tight 
parallel I/O lines. The I/O lines are buffered in 
six groups of eight lines each, with separate buf- 
fer direction control for each group. Buffer 
direction can be fixed by hardware jumpers, or can 
be software programmable for bidirectional applica- 
tions. 

PROTOTYPING BOARD (SBC-**) $75.00 

The SBC~tM provides a means of developing and 
testing custom I/O interface designs for the GMX 
Micro-20 20 Single-board Coaputer. The board 
provides areas for both DIP (Dual Inline Package) 
and PGA (Pin Grid Array) devices, and a pre-wired 
memory area for up to 512K bytes of dynamic RAM. 

I/O BUS ADAPTER (SBC-BA) $195.00 

The SBC-BA provides an interface between the GMX 
Micro-20 68020 Single-board Computer and the 
Motorola Input/Output Channel (I/O bus). Uith the 
I/O bus, up to sixteen off-the-shelf or custom 
peripheral devices (I/O modules) can be connected 
to the GMX Muro-20. 

AROCT LAN board w/o Software (SBC -AN).... $475. 00 

The SBC -AN provides an interface between the 
GHX Muro-20 68020 Single-board oaputer and the 
ARCNET modified token-passing Local Area Network 
(LAN) originally developed by Datapoint Corp, The 
AROCT is a baseband network with a data trans- 
mission rate of 2.5 Megabits/second. The standard 
transmission media is a single 93 ohm RG-62/U 
coaxial cable. Fiber optic versions are available 
as ait option. 

0S9 LAN Software Drivers for SBC -AN $ 120.00 



CHICAGO, ILLINOIS 80809 • (312)927-5510 • TWX 910 221-4055 



GMX MICRO 20 StFTMARE 

020 BUG UPOATE - PROMS t MANUAL $ 150.00 

THESE 68020 OPERATING SYSTEMS ARE PRICED WHEN PUR- 
CHASED UITH THE MICRO-20. PLEASE ADD $150.00 IF 
PJOtfSD LATER FOR THE UPDATED PROMS AND MANUALS. 

0S9 

OS9/68020 PROFESSIONAL PAK $ 850.00 

Includes O.S. •C" EDITOR, ASSEMBLER, OEHIHR, 
development utilities, 68881 support. 

Other Software for OS-9/68020 

BASIC (included in PERSONAL PAK) $ 200.00 

C COMPILER (included in PROFESSIONAL PAK).$ 500.00 
PASCAL COMPILER $ 500.00 

UNIFLEX 

UmFLEX (when ordered with Board) $ 450.00 

UniFLEX UITH REAL-TIME ENHANCkMENTS $1000.00 

Other Software for UniFLEX 

UniFLEX BASIC M/PRECOMPILER $ 300.00 

UniFLEX C COMPILER $ 350.00 

UniFLEX COBOL COMPILER $ 750.00 

UniFLEX SCREEN EDITOR $ 150.00 

UniFLEX TEXT PROCESSOR $ 200.00 

UniFLEX SORT/MERGE PACKAGE $ 200.00 

UniFLEX VSAM NODULE « 100.00 

UniFLEX UTILITIES PACKAGE I $ 200.00 

UniFLEX PARTIAL SOURCE LICENSE $1000.00 

GMX EXCLUSIVE VERS IONS, CUSTOMIZED FOR THE MICRO-20, 
OF THE BELOW LANGUAGES AMD SOFTWARE ARE ALSO AVAIL- 
ABLE FROM GMX. 

ABSOFT FORTRAN (UniFLEX) $1500.00 

SQLPTOR (specify UniFLEX or 0S9) $ 995.00 

FORTH (0S9) $ 595.00 

DYNACALC (specify UniFLEX or 0S9) $ 300.00 

GHX DOES NOT GUARANTEE PERFORMANCE OF ANY OMX 
SYSTEMS, BOARDS OR SOFTWARE WHEN USED UITH OTHER 
MANUFACTURES PRODUCT. 

ALL PRICES ARE F.O.B. CHICAGO 

GMX, Inc. reserves the right to change pricing, 
terms, and products specifications at any time 
without further notice. 

TO DRDER BY NAIL: SEND CHECK OR MONEY ORDER OR 
USE YOUR VISA OR MASTER CHARGE. Please allow 
3 weeks for personal checks to clear. U.S. 
orders add $5 handling if under $200.00. 
Foreign orders add tic handling if order is 
under $200.00. Foreign orders over $200.00 
will be shipped via Emery Air Freight COLLECT, 
and we will charge no handling. All orders 
must be prepaid in U.S. funds. Please note 
that foreign checks have been taking about 8 
weeks for collection so we would advise 
wiring money or checks drawn on a bank account 
in the U.S. Our bank is the Continental Illinois 
National Bank of Chicago, 231 S. LaSalle Street, 
Chicago, IL 60693, account number 73-32033. 

CONTACT GMX FOR MORE INFORMATION ON THE ABOVE PRODUCTS 

GMX STILL SELLS GIM1X S50 BUS SYSTEMS, BOARDS I PARTS. 
CONTACT GMX FOR COf\£TE PRICE LIST. 
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Now Offenng *FLEX" (2 Versions) 
AND 'STAR-DOS PLUS+ '" 




For Otttmrtng Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX" on 

The CoCo 
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STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads • writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run 'STAR DOS" 

• Over 300 utilities & programs 
to choose from 



f 


TSC Editor 




NOW $35.00 


L 


y) 



PLUS 

ALL VERSIONS OF FLEX & STAR-DOS 

+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free UtJities 




INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoty Examine Program 
+ Many Many More!!! 



TSC Assembler 
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NOW $35 OO 
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CoCo Disk Drive Sgsleuis 



2 TH1NLINE DOUBLE SIDiO DOUBLE DENSITY DISK DRIVES 
SYSTEM WITN FDUEE SUCI-L* .CAIINtT, 01SI OllVE CARLE. JiH 
NEW DISK CONTROLLER JP0-CP VJTH J-OOS.RS-DOS OPERATINC 
SYSTEMS. |4*«.») 

• Spiel (y What CONTROLLER You Want JAN, or RADIO SHBCX 

TMINLINE DOUBLE S1DE0 
DOUBLE DENSITY *0 TRACKS 



MK VPCSAOi 

FOR C.0,E, P, AND COCO II 
RADIO SHACK BASIC I. 2 
EAD10 SHACK DISK BASIC 1.1 



Verhjhm Diskettes 



Sinftlf Sldad Doubl« DtDtity 
Deubl* Sided Double Deoelty 



Cooli oilers 



JtN JPO-CP WITH J-0OS 
WITH J-OOS, KS-OOS 
RADIO SHACK ] . I 

RADIO SHACK Diik CONTROLLER 1.1 



Disk Di ive Ciu!>-'> 



Ceble for One Drive 
Cable for Two Drive* 





DISK OltVE CABINET POl A 


III*. as 


SINGLE (WIVE 




DISK DRIVE CAEINET POl TWO 




TK1NLINE DRIVES 


} 14.00 


nirruj 


} 14.00 


EPSON U-BO 




EPSON HX-70 




EPSON KX-100 


•139. 95 


ACOMoaiE* rot ifboc 


$119. *» 
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61*6 2E SEEIAL BOARD 


81*9 32K EXPAND TO I2BK 




EPSON MJ-M-UO KIIMNS 


413*. aj 


EPSON LX-80 ElEtONS 




TEACTOE UNITS PO« LX-BO 




CABLES 4 •THE* IHTCK/ACKS 




CALL POR PRICING 


i la.tj 




i 24. as 





I 29.95 



t 24. as 
i 24. as 



* 4».»5 

t ta.as 



B2M.9J 

•us.aj 
$»*i.*i 



JI49.95 

» s.as 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 
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SHIPPING tS* 

f^:^ d ^" s .| (615)842-4600 

n(H. $2.50 'Of OtoWring 

Telex 5106006630 
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S - 50 bus / 68XX 



Board and/or Computer 

Term inals-CRTs-Printers 

Disk Drives-etc. 

REPAIRS 



NOW AVAILABLE TO ALL SS0/S8XX USERS 
The Data-Comp Division ol CPI is proud to announce the availability of their 
service dopartmont facilities to 'ALL* S50 Bus and 68XX users Including all 
brands, SWTPC • GIMIX - SS6 ■ HELIX and others, including the single board 
computers "Please note thai kit-built components are 3 special case, and will 
be handled on an individual basis, il accepted. 

1. II you require service, the first thing you need to do is call the number 
bo low and doscribo your problem and confirm a Data-Comp service $ shipping 
number) This is vary important. Data- Camp will not accept or repair Horns not 
displaying this number! Also we cannot advise or help you troubles hoot on the 
telephone, wo can give you a shipping number, but NO advice! Sorry 1 

2 All service shipments must include both a minimum $4000 
estimate/repair charge and pre-paid return shipping charges (should be same 
amount you pay to ship to Data-Comp). 

3 II you desire a telephone estimate after your repair item Is received, 
include an additional $5 00 to cover long distance charges. Otherwise an 
estimate will bo mailed to you, if you requested an estimate. Estimates must 
be requested Mailed estimates slow down the process considerably 
However, it repairs are not desired, after the estimate is given, the $40 00 shall 
constitute the estimate charge, and the iiom(s) will be returned unrepaired 
providing sufficient return shipping charges were included with the item to be 
serviced Please note that estimates are given in dollar amounts only. 

4 Data-Comp service Is the oldest and most experienced general 
S50/&SXX service department in the world We have over $1 00,000.00 in parts 
in stock Wo have the most complete set of service documents lor the various 
S50/68XX systems of anyone YET, WE DO NOT HAVE 
EVERYTHING! But we sure have more than anyone else We repair about 
90% ol all items we receive Call for additional information or shipping 
instructions 
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DATA-COMP 

5900 Cassandra Smith Rd. 
Hbtson.TN 37343 
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(615)842-4607 
Telex 51 06006630 
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